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I.  OVERALL  REVIEW  OF  OBJECTIVES 


The  overall  objectives  In  this  program  have  been  directed  toward 
providing  a  significantly  improved  capability  in  the  determination  of 
field  astropositlon.  These  investigations  address  several  of  the  funda¬ 
mental  errors  in  field  astrometry,  particularly,  the  effects  of  anoma¬ 
lous  atmospheric  refraction  and  personal  error.  A6  we  shall  discuss 
later,  these  will  indirectly  influence  the  questions  of  star  catalogs. 

The  Initial  efforts  under  this  contract  were  addressed  toward  Two- 
Color  Refractometry.  This  is  a  technique  for  the  determination  of  the 
total  refraction  suffered  by  the  light  of  a  star  prior  to  entry  into  the 
instrument.  This  may  be  separated  into  conventional  refraction,  which 
is  normally  corrected  in  the  procedures  and  analysis  of  field  astro- 
position,  and  anomalous  refraction,  which  is  not  normally  corrected. 

The  Two-Color  Refractometer  is  an  instrument  to  measure  this  and  provide 
data  to  correct  for  this  difficulty.  This  initial  effort  was  then 
shifted  to  exclusively  develop  the  Charge  Coupled  Device  as  an  array 
eyepiece  for  the  Two-Color  Refractometer. 

The  Array  Eyepiece  for  the  Two-Color  Refractometer  permits 
automated  data  recording  to  provide  processing  of  the  astro-position 
observations.  Thus,  one  does  not  need  an  optical  observer  to  record  the 
star  position  with  respect  to  the  wires  of  the  T-4  Theodolite.  This 
device  has  been  designed,  fabricated,  tested  and  evaluated  in  the 
field.  The  results  of  these  evaluations  at  the  U.S.  Naval  Observatory 
indicate  a  highly  consistent  performance,  apparently  limited  by  other 
errors  in  the  astropositlon  procedure. 

Future  efforts  on  other  projects  will  consist  of  the  return  to  the 
Two-Color  Refractometry  to  provide  a  parallel  correction  for  the  mean 


anomalous  refraction,  and  later,  a  device  Incorporating  aspects  of  an 
astrolabe  and  the  Two-Color  Refractometer  operating  through  the  same 
aperture  which  will  permit  instantaneous  corrections  for  the  refraction 
and  for  the  use  of  an  Array  Eyepiece. 

The  latter  joint  Instrument,  which  was  the  long-term  objective  of 
the  overall  program,  should  provide  a  quantum  leap  in  the  accuracy  of 
astroposltion  measurements. 
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II.  REVIEW  OF  TWO-COLOR  REFRACTOMETRY  OBJECTIVES 
The  original  objectives  of  the  program  in  Two-Color  Ref ractometry 
were  to  fabricate  and  demonstrate  an  instrument  which  had  initially  been 
invented  and  proposed  by  the  University  of  Maryland.  This  instrument 
was  to  operate  as  an  adjunct  to  a  field  determination  of  astroposition 
using  a  conventional  (or  automated)  T-4  Theodolite. 

In  addition  to  the  fabrication  and  demonstration  of  such  a  piece  of 
equipment,  we  planned  to  perform  detailed  measurements  of  the  variation 
in  refraction  in  the  sky  in  order  to  establish  both  the  temporal  and  the 
angular  stability  and  reproduceabllity  of  measurements  of  the  anomalous 
refraction.  These  measurements  are  especially  Important  in  the 
definition  of  a  final  field  Instrument,  as  this  addresses  the  question 
of  the  star  magnitude  required  for  observation.  If  it  is  necessary  to 
observe  stars  simultaneously,  an  FK4  star  being  observed  by  the  T-4 
Theodolite  dictates  that  the  Two-Color  Ref ractometer  must  operate  to 
sixth  magnitude  and  over  a  variety  of  spectral  types.  This  would 
require  that  the  instrument  have  a  large  aperture.  On  the  other  hand, 
if  there  is  the  expected  stability  in  time  and  in  angle  to  permit  the 
anomalous  refraction  to  be  determined  in  a  general  region  near  zenith, 
then  we  may  use  these  as  corrections  to  the  T-4  Theodolite  measurements 
on  the  FR4  stars.  The  latter  measurement  technique  will  require  a  much 
smaller  aperture  and  therefore  a  much  less  complex  system. 

For  this  reason,  we  had  expected  to  operate  with  a  variety  of 
aperture  sizes  and  to  provide  a  survey  of  the  variations.  This  survey 
would  be  done  in  an  automated  fashion. 

However,  the  latter  portions  of  this  effort  were  not  completed  due 
to  the  shift  in  emphasis  to  the  Charge  Coupled  Device  Array  Eyepiece  for 
the  T-4  Theodolite. 


III.  ACHIEVEMENTS  IN  TWO-COLOR  REFRACTOMETRY  DURING  THIS  CONTRACT 
The  Instrument  was  fabricated  and  tested  initially  in  the 
laboratory.  It  was  also  interfaced  to  the  Goddard  telescope.  A 
considerable  amount  of  time  was  spent  in  working  with  this  telescope  and 
on  its  pointing  system.  This  interaction  was  due  to  short-comings  of 
the  telescope  system.  In  the  end,  this  system  work  plus  certain  optical 
problems  (which  occurred  after  the  end  of  the  support)  resulted  in  the 
shifting  of  emphasis  to  the  CCD. 

A.  Design  of  the  Two-Color  Refractometer 

A  detailed  design  of  the  Two-Color  Refractometer  was  approached  and 
completed.  This  transformed  the  initial  concept,  which  specified  only 
nominal  components  and  nominal  specifications,  into  a  series  of  designs 
that  could  be  shop  fabricated,  both  in  the  electrical  and  mechanical 
areas,  as  well  as  items  that  could  be  purchased.  This  design  was  then 
reviewed  to  assure  that  the  null  aspects  were  addressed  that  would  be 
expected  in  a  design  of  this  type. 


IV.  ACHIEVEMENTS  DURING  REPORT  PERIOD 
A.  Field  Site  Constuction 

The  TCR  was  installed  on  the  48-inch  telescope  at  its  Coude  port. 
(See  Figure  1.) 

1.  Selection 

The  selection  of  a  telescope  for  the  initial  observations 
with  the  TCR  had  several  technical  requirements.  Predominant 
among  these  were  the  need  for: 

a.  Reflecting  telescope 

b.  Ability  to  make  many  observations 

c.  Frequent  access 

This  requires  that  the  telescope  be  in  the  Washington 
area  during  equipment  development. 

The  reason  for  computer  control  is  the  desire,  at  a 
later  stage  in  the  program,  to  determine  the  temporal  and 
angular  stability  of  the  correction.  This  has  a  large 
Impact  on  the  aperture  to  be  used  in  the  system.  For  this 
reason,  we  would  like  a  computer  controlled  drive. 

The  above  criteria  led  to  the  selection  of  the  48- 
inch  telescope  at  the  Goddard  Space  Flight  Center.  Due  to 
their  interest  in  the  results  of  this  program,  this  use  of 
the  telescope  at  that  time  was  contributed  without  cost. 

The  major  disadvantage  of  this  telescope  consisted  of 
prototype  nature  of  the  programs.  A  very  considerable 
effort  has  been  required  to  bring  their  programs  up  to  the 
level  required.  UM  personnel  have  had  a  very  close 
involvement  in  this  procedure. 
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2.  Telescope  Configuration 

The  48-inch  telescope  is  an  azimuth/elevation  drive.  The 
beam  is  brought  to  a  reflecting  mirror  and  then  directed  to  6 
different  ports.  One  of  these  ports  was  made  available  for  the 
work  with  Two-Color  Refractoraetry.  Thus,  the  TCR  was  mounted 
at  this  point. 

3.  Interface  and  Programming 

With  the  aid  of  Goddard  personnel,  the  Two-Color 
Refractometer  interfacing  had  been  completed  earlier.  This  was 
an  Interface  between  the  TCR  and  the  telescope  drive  system. 

The  physical  interface  was  made  at  the  University  of  Maryland 
shop. 

However,  the  software  interfacing  proved  more  difficult. 
Various  types  of  instabilities  and  difficulty  with  telescope 
encoders  were  encountered  and,  by  joint  work  with  University  of 
Maryland  personnel  and  Goddard  personnel,  corrected.  This 
provided  a  stationary  place  where  it  could  be  repeatedly 
accessed.  However,  it  was  found  that  this  required  interaction 
with  Goddard  personnel  with  respect  to  developing  their  on¬ 
going  improvement  program. 

B.  Electronics  Fabrication 

The  electronics  consist  of  two  major  domains.  The  first  is  the 
control  of  the  system,  and  the  rest  is  the  computer  system  and 
Interfacing. 

1.  Specialized  Electronics  System 

This  Is  the  Display  and  Control  Console  (DCC).  This  was 
designed  and  fabricated  to  provide  the  proper  control  of  the 


various  experimental  functions  and  to  provide  the  Interfacing 
required  between  the  data  outputs  and  the  computer  to  do  the 
final  control  and  the  data  processing. 

The  Individual  components  of  this  consist  of: 

a.  Wedge  Drivers 

The  mounts,  which  hold  the  wedges,  were  purchased 
through  Klinger  Scientific  Company.  The  wedges  consist  of 
two  elements  of  glass,  UBBK7  and  fused  silica.  These  were 
chosen  in  order  to  provide  dispersion  but  no  deviation. 
They  are  mounted  in  a  drive  which  provides  rotary 
motion.  There  is  also  a  16  bit  encoder  and  initializing 
track.  The  encoder  is  read  by  the  DCC  and  the  voltage  to 
drive  the  wedges  is  derived  from  the  DCC. 

b.  Image  Stabilizers 

These  are  small  mirrors  mounted  on  galvenometer  drive 
motors.  Motors  are  from  General  Scanning  Corporation. 

The  drive  for  these  motors  Is  contained  In  the  DCC.  They 
are  in  a  closed  servo  loop  to  maintain  the  image  in  a 
stabilized  position. 

c.  Color  Wheel 

This  serves  the  function  of  rapidly  changing  red  and 
blue  filters.  It  consists  of  Intermittent  RG610  glass  and 
UG11  glass  In  a  wheel.  The  rotational  speed  is  60  rps. 
This  results  in  4800  filter  changes  per  second.  The 
shroud  provides  both  safety  and  reduction  of  required 
motor  power  due  to  control  of  turbulence  and  inertial 
Interaction  with  the  air.  The  position  of  the  wheel  is 


determined  by  a  light  emitting  diode  observing  changes  in 
the  reflectivity  of  the  wheel. 

d.  Reflective  Relmager 

The  focal  length  of  the  48-inch  telescope  is  much  too 
long  to  be  suitable  for  this  experiment.  For  this  reason, 
we  have  to  re-image  or  change  the  focal  ratio.  This 
reflective  recollimator  is  a  small  inverted  Cassegrain 
telescope  which  is  frequently  used  for  microscope  lens 
systems.  This  changes  the  f  ratio.  It  is  a  commercially 
available  device.  However,  it  appears  to  have  significant 
vignetting  problems  in  actual  operation  and  has  proved 
very  difficult  to  align. 

e.  Photomultiplier 

The  photomultipliers  are  fabricated  by  Electronic 
Vision  Company  and  are  quadrant  devices.  These  were 
difficult  to  obtain,  but  we  had  a  sufficient  supply  to 
operate  the  program,  although  at  much  lower  quantum 
efflcency  than  desired. 

f.  Preamplifier  System 
C.  Software  Development 

The  software  development  for  the  Two-Color  Refractometer  has  fallen 
into  two  major  areas.  These  consist  of: 
l.  Operational  Software 

a.  Wedge  Drive  Computation 

The  drive  for  the  wedges  is  a  significantly 
complicated  algebraic  expression  with  decision  points 
required.  Thus,  this  must  be  run  in  the  NOVA  minicomputer 


In  real  time.  For  different  telescopes,  the  break  points 
must  be  defined  differently  in  order  to  get  stable 
operation. 

b.  Data  Handling 

This  consists  of  interrogating  different  sites  at 
which  data  is  generated,  combining  these  into  proper 
records,  and  writing  to  magnetic  tape. 

c.  Real  Time  Processing 

This  consists  of  providing  display  outputs  that 
permit  one  to  determine  if  the  instrument  is  operating  in 
a  basically  proper  manner. 

D.  Operating  Procedures 

These  procedures  were  required  for  acquisition,  alignment,  and 
tests. 

E.  Observation  Series 

A  number  of  observation  series  were  taken. 

F.  Results 

Dispersion  was  determined.  A  significant  bias  was  observed.  The 
reason  for  this  bias  is  unclear,  although  it  is  believed  to  be  the  now 
alignment  due  to  shadowing  of  the  secondaries.  This  occurs  differently 
for  the  two  different  colors  which  remains  somewhat  of  a  mystery. 

G.  Recommendations 

At  this  point,  more  precise  alignment  is  needed.  Masks  have  been 
used  to  some  advantage.  However,  testing  had  not  been  feasible  by  the 
end  of  this  program. 


VI.  REVIEW  OF  OBJECTIVES 

The  work  described  In  this  section  of  the  report  is  part  of  a 
program  conducted  at  the  University  of  Maryland  to  develop  an  Impersonal 
electronic  eyepiece  system  for  the  T-4  Theodolite.  The  critical  element 
of  this  impersonal  eyepiece  is  an  electronic  camera  head  which  operates 
the  Charge  Coupled  Device  and  the  associated  electronics.  This  is 
designed  to  replace  the  conventional  visual  eyepiece  on  the  T-4 
Theodolite.  The  overall  system  thus  includes  the  Charge  Coupled  Device, 
the  electronics  required  for  camera  control  and  data  acquisition,  the 
software  to  operate  the  system  in  the  field,  and  the  algorithms  and 
software  developed  to  analyse  the  data  which  is  produced  by  the  Array 
Eyepiece  System. 

The  basic  principle  Involved  in  the  application  of  a  specially 
designed  CCD  camera  for  use  in  astroposltlon  observations  with  a  T-4 
Theodolite  consists  of  the  use  of  the  intrinsic  structure  of  the  CCD  to 
encode  a  series  of  timing  signals  as  a  star  image  moves  across  the 
CCD.  The  structure  of  the  signals  is  similar  to  those  timing  signals 
provided  by  the  motion  of  the  drum  which  occur  when  a  visual  observer  is 
tracking  the  star  with  the  conventional  eyepiece.  The  actual  epoch  of 
these  timing  signals  is  derived  from  a  computer  analysis  of  each  of 
several  thousand  images  for  each  exposure  which  are  recorded  on  magnetic 
tape.  This  is  recorded  in  conjunction  with  a  reading  of  a  precision 
clock. 

The  CCD  camera  that  is  currently  in  use  is  the  "Mark  V"  CCD  Camera 
Head  which  has  been  developed  at  the  University  of  Maryland.  In 
addition  to  the  electronics  used  to  operate  the  CCD  Itself,  the  Camera 
Head  contains  a  remotely  controlled  and  powered  thermoelectric  cooler  to 


stabilise  the  CCD  temperature,  an  Isolated,  buffered  video  amplifier,  an 
analog-to-dlgltal  converter,  and  a  subtraction  system  that  permits  the 
removal  of  leakage  pattern,  or  the  "fixed  pattern  noise"  from  the  CCD 
output.  (This  is  accomplished  by  the  subtraction  of  the  stored  "dark" 
image  from  the  video  output  in  real  time.  The  "dark”  image  is  that 
pattern  obtained  in  the  absence  of  any  light  input). 

The  ultimate  objective  of  this  program  is  to  deliver  a  complete, 
self-contained  T-4  observing  system  (with  related  analysis  software)  to 
the  Air  Force  Geophysics  Laboratory/Defense  Mapping  Agency,  and  to  train 
observers  to  use  this  system  in  the  field. 
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VII.  ACHIEVEMENTS  AND  OBJECTIVES 

In  this  section,  we  shall  address  the  primary  objectives  and 
achievements  within  the  program.  These  will  be  addressed  from  the  point 
of  view  of  the  subtasks  which  require  different  approaches.  The  details 
of  these  different  approaches  will  be  considered  in  a  later  section. 

A.  Summary  of  Objectives 

The  principal  objectives  during  the  current  report  period  will  be 
briefly  summarised  in  this  section,  then  elaborated  in  later  sections. 
They  consist  of: 

1.  Observing  Field  Site 

An  observing  site  was  developed  at  the  Goddard  Optical 
Research  Facility  (GORF).  This  observing  site  (previously  on 
the  roof  at  the  University  of  Maryland)  provided  a  site  from 
which  to  make  regular  measurements  in  a  reasonably  dark 
environment.  It  also  provided  security  and  power.  The  initial 
operation  was  conducted  using  a  trailer  which  had  been  Involved 
in  the  Amplitude  Interferometry  Program  (AIP).  The  later 
observations  were  conducted  with  a  mobile  van  supplied  by  the 
Geodetic  Survey  Squadron.  The  equipment  was  installed  in  this 
van  by  the  University  of  Maryland. 

2.  Electronic  Opto/Mechanical  Fabrication  and  Evaluation 

This  task  consists  of  the  fabrication  and  evaluation  of 
various  electronic  subsystems  and  opto/mechanical  components 
for  the  Array  Eyepiece  System  as  used  on  the  T-4  Wilde 
Theodolite.  The  msjor  items  addressed  consist  of  the 
integration  of  the  computer  into  the  overall  system  as  well  as 
various  tasks  concerning  the  opto/mechanlcal  positioning  of  the 


Array  Eyepiece  System. 

3.  Astronomical  Position  Observation  Series 

This  task  consists  of  conducting  a  series  of  observations 
at  the  AIP  Site  at  GORF.  The  purpose  of  these  observations  is 
to  evaluate  the  current  implementation  of  the  University  of 
Maryland  Array  Eyepiece  System  for  operation  on  the  T-4 
Theodolite. 

4.  Array  Eyepiece  System  Data  Reduction 

This  task  consists  of  the  reduction  of  the  CCD  data  that 
is  obtained  from  the  astroposltlon  observations  conducted  at 
the  AIP  Site  at  GORF.  The  purpose  of  this  task  is  to  evaluate 
the  current  status  of  the  hardware  and  "analysis  software", 
which  has  been  developed  for  the  analysis  of  the  CCD  data. 

This  software  is  used  to  determine  the  time  of  meridian  passage 
for  the  determination  of  the  longitude. 

3.  Software  Development 

This  task  consists  of  the  development  and  evaluation  of 
the  computer  programs  and  software  required  to  analyze  the 
output  of  the  CCD  and  to  derive  from  this  data  the  time  of 
meridian  passage  for  the  star.  This  task  thus  consists  of  the 
definition  and  the  implementation  of  various  computer  programs 
and  procedures  to  overcome  difficulties  in  the  electronic 
hardware,  the  atmospheric  conditions,  and  the  observing 
procedures,  in  order  to  obtain  more  precise  results. 

6.  Production  Data  Reduction 

This  task  consists  of  the  continuation  of  the  support  of 
the  Geodetic  Survey  Squadron.  Their  task  consists  of  the 
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VIII.  AREAS  OF  EFFORT 

We  now  address  each  of  these  areas  in  more  detail. 

A.  Field  Site  Construction 

We  consider  here  the  three  independent  field  test  sites. 

1.  University  of  Maryland  Canpus 

This  consisted  of  the  roof  of  the  Physics  building  on 
campus.  This  had  the  high  convenience  of  permitting  a  rapid 
cycling  of  equipment  for  electronic  repair.  It  also  permitted 
access  to  auxiliary  equipment  during  the  initial  break-in 
phase.  Finally,  it  provided  the  convenience  of  not  moving  the 
computer  prom  its  daytime  configuration.  This  was  especially 
Important,  since,  at  this  time,  the  computer  was  on  loan  from 
another  program. 

2.  Goddard  Optical  Research  Facility/AIP  Trailer 

The  remaining  tests  were  conducted  at  the  AIP  site.  The 
primary  facility  used  at  the  Goddard  Optical  Research  Facility 
(GORF)  consists  of  an  observing  site  which  had  previously  been 
developed  within  our  group  for  Very  long  Baseline  Amplitude 
Interferometry.  This  had  resulted  in  the  availability  of  a 
trailer  with  heat  and  suitably  situated  for  observations.  A 
telephone  was  also  available  at  the  site  as  well  as  sufficient 
power.  Security  was  available  via  the  Goddard  Space  Flight 
Center  security. 

This  site  had  been  investigated  with  respect  to  geographic 
and  geologic  stability.  The  results  of  these  investigations 
implied  that  this  particular  site  is  relatively  stable.  This 
has  been  discussed  in  some  detail  In  the  Goddard  report  titled, 


"On  Che  Geodetic  Stability  of  the  Goddard  Optical  Research 
Facility." 

Surrounding  the  concrete  pier,  a  wooden  floor  was  fabri¬ 
cated.  This  floor  permitted  observer  and  equipment  to  be  used 
near  the  pier  without  placing  varying  forces  on  the  pier  itself 
or  on  the  ground  immediately  surrounding  the  pier.  Beyond 
this,  a  conventional  T-4  observing  tent,  supplied  as  government 
furnished  equipment  by  the  Defense  Mapping  Agency  and  the 
Geodetic  Survey  Squadron,  was  erected.  This  was  done,  with  the 
aid  of  Nr.  Rudolf  Salvermoser  of  the  Defense  Mapping  Agency  ,  to 
provide  a  shelter  which  would  be  useful  for  the  test  of  the 
Array  Eyepiece  System  as  well  as  to  follow  the  conventional 
rules  for  observation  using  a  T-4  Theodolite. 

This  system  remained  in  operation  for  over  a  year.  During 
this  time  there  were  some  modifications.  In  addition  to  the 
observing  tent,  a  trailer  which  was  originally  intended  for  use 
within  a  separate  program  at  the  University  of  Maryland  was 
provided  for  use  in  the  AFGL/DMA/GSS  program.  This  trailer 
provided  shelter  for  the  special  University  of  Maryland 
electronics,  the  NOVA  minicomputer,  and  its  required  peripheral 
equipment.  It  also  provided  shelter  for  the  Data  Metrics 
clock,  which  was  supplied  as  government  furnished  equipment  by 
the  Defense  Mapping  Agency  and  the  Geodetic  Survey  Squadron, 
and  for  the  terminals  and  monitors  required  by  an  observer  in 
Che  operation  of  the  Array  Eyepiece  System.  The  trailer  also 
provided  a  working  area  for  the  evaluation,  repair  and  testing 
of  the  electronic  and  computer  systems.  It  also  provided 


17 


shelter  for  the  observer,  recorder  and  computer  operator  during 
the  observing  sessions.  Various  additions  were  made  to  the 
trailer  shelter  during  the  period  of  observation.  This 
Included  Improved  WWV  reception,  heating  for  winter  operations, 
air  conditioning  to  maintain  the  equipment  during  the  summer. 

A  work  area  for  the  recorder  was  also  provided. 

GSS  Van 

In  order  to  provide  a  field  portable  system  which  could 
easily  be  carried  to  different  sites,  a  van  capable  of  being 
towed  in  a  reasonable  manner  on  the  highway  was  supplied  by  the 
Geodetic  Survey  Squadron  (GSS)  as  government  furnished 
equipment.  This  van  was  converted  from  previous  applications 
by  personnel  at  GSS  In  Cheyenne,  Wyoming.  The  van  was  then 
supplied  to  the  University  of  Maryland.  Sacks  were  purchased 
by  the  University  of  Maryland  and  Installed.  Heating  and  air 
conditioning  were  provided  by  GSS.  The  equipment  was 
transferred  from  the  University  of  Maryland  trailer  to  the  GSS 
van.  This  included  the  full  set  of  equipment,  plus  temporary 
equipment  for  time  checks.  Special  feed  throughs  were  provided 
In  order  to  permit  cables  to  be  passed  from  within  the  van  to 
the  T-4.  Connectors  were  provided  to  disconnect  these  cables 
and  a  shelter  box  for  the  storage  of  these  cables  without 
disconnecting  was  also  provided. 

This  van  was  operated  first  at  the  Goddard  Optical 
Research  Facility  and  then  at  the  U.S.  Naval  Observatory.  A 
photograph  of  this  van,  or  enclosure,  is  shown  in  Figure  1.  In 
the  Installation  at  USNO,  the  T-4  Theodolite  with  the  Array 


Eyepiece  System  was  operated  in  the  USNO  Astrolabe  building. 
The  T-4  was  mounted  on  a  special  pier  modification  which 
attached  to  the  astrolabe  pier.  In  the  following  photograph, 
we  indicate  the  Array  Eyepiece  System  enclosure  and  the 
astrolabe  building.  Note  the  power  generator  on  the  back  of 
the  Array  Eyepiece  System  enclosure. 


Figure  1 

Array  Eyepiece  enclosure  in  operational 
configuration  as  used  at  USNO. 
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Figure  2 

Array  Eyepiece  System  enclosure  operating  at 
USNO  adjacent  to  astrolabe  building. 


The  transfer  of  cables  through  the  wall  Is  Indicated  In  Figure  3. 
This  provides  minimal  wear  on  the  fiber  optic  coolers  and  minimal  wear 
on  the  connectors  for  disconnecting.  It  provides  shelter  for  these 
during  non-observing  periods  In  the  box. 
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Figure  3 

Trailer  with  wire  cable  connected. 

B.  Electronics  Fabrication 

In  this  section,  we  shall  address  the  overall  configuration  and  the 
individual  components  of  the  electronic/computer  system  used  to  operate 
the  Array  Eyepiece  System  on  the  T-4  Theodolite.  The  overall  layout  of 
the  electronic  system  evolved,  in  terms  of  individual  components,  from 
the  early  tests  on  the  campus  site  to  the  final  delivered  form. 

In  this  document,  we  shall  address  one  or  more  typical  configura¬ 
tions.  These  configurations  frequently  used  a  variety  of  different 
equipment,  in  particular,  equipment  being  fabricated  and  tested  for 
final  delivery,  Inserted  and  tested  in  a  matrix  of  equipment  provided  on 
loan  from  the  Electronics  Shop  and  on  loan  from  an  independent  program 
in  Interferometry  of  the  Office  of  Naval  Research. 


21 


Overall  Configuration 

We  now  consider  the  overall  configuration  at  one 
particular  era.  This  is  indicated  in  Figure  4. 


Figure  4 

9  June  1982  configuration  for  the 
Array  Eyepiece  System  for  the  T-4  Theodolite. 


This  illustrates  the  details  of  the  system  as  it  was  to  be 
tested  on  9  June.  We  now  consider  several  evolutionary  steps 
in  the  system  which  are  expected  in  the  near  future.  We  expect 
certain  components  which  have  been  tested,  but  not  required,  to 
be  installed  by  GSS. 

This  configuration  was  to  be  completed  by  the  end  of 
June.  It  included  the  installation  of  the  Circulating 
Semiconductor  Memory  (CSM)  and  the  Fiber  Optic  Camera. 

However,  these  tests  were  delayed,  at  the  request  of  the 


Geodetic  Survey  Squadron  until  the  system,  without  subtraction, 
had  been  tested  at  the  observing  station  in  Cheyeene, 

Wyoming.  Thus,  the  system  as  used  for  the  final  series  of 
tests  did  not  include  the  subtraction. 

This  reflects  the  frequent  situation  of  requested  modifi¬ 
cations  that  propagated  throughout  the  entire  system  which 
required  minor  but  significant  modifications  at  a  variety  of 
points  in  order  to  maintain  the  full  accuracy  of  the  system. 

We  now  describe  individual  components. 

Mark  V  CCD  Camera  Head 

The  Mark  V  Camera  Head  consists  of  the  black  box  which  is 
6  3/16"  by  4”  by  5"  in  dimension.  This  has  a  weight  of  3.4 
pounds.  A  second  configuration  for  the  Mark  V  Camera  Head  has 
been  developed  and  tested.  This  second  configuration  consists 
of  an  interface  to  a  fiber  optic  data  transmission  system. 

This  system  converts  the  digital  electronic  data  into  digital 
optical  data.  A  similar  receiving  unit  is  required  at  the 
Remote  Control  Unit.  When  combined  with  the  basic  Mark  V 
Camera  Head,  this  combined  configuration  has  a  dimension  of 
6  3/16”  by  5  by  7  inches.  For  this  combined  system,  the  weight 
is  6.7  pounds,  including  the  fiber  optic  interface.  The 
overall  function  of  this  unit  consists  of  the  receipt  of  light 
from  the  outside  and  the  conversion  of  this  into  digital 
signals  for  further  processing, 
a.  CCD  Driver  Card 

This  card,  which  is  an  element  of  the  Mark  V  camera 
head,  contains  the  Charge  Coupled  Device  which  senses  the 
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light.  This  CCD  is  mounted  on  the  card  in  a  dual  in-line 
socket.  Also  contained  on  this  card  are  "clock  driver" 
integrated  circuits  which  convert  the  various  voltage 
pulse  trains  to  high  current  pulse  trains.  The  latter  are 
required  to  drive  the  Charge  Coupled  Device. 

b.  Thermoelectric  Cooler  Card 

This  card  contains  the  thermoelectric  cooler  which  is 
used  to  maintain  the  Charge  Coupled  Device  at  a  predeter¬ 
mined  temperature.  This  temperature  is  typically  a  few 
degrees  below  the  ambiant  temperature.  This  card  also  has 
special  brackets  which  permit  the  rapid  conduction  of  the 
heat  extracted  from  the  CCD  and  the  heat  therein  generated 
by  the  thermoelectric  cooler  to  be  conducted  to  the  body 
of  the  camera  head. 

c.  A-to-D  Converter  Card 

This  removeable  card  contains  the  circuitry  for 
conversion  of  the  analog  signals  received  from  the  Charge 
Coupled  Device  into  digital  signals.  This  must  be  done 
with  high  precision  over  a  large  range  to  fully  accomodate 
the  operating  range  of  the  CCD  and  the  expected  range  of 
the  signals.  The  advantage  of  the  use  of  digital  signals 
consists  in  the  immunity  to  external  radiation  and  ground 
loop  difficulties. 

d.  Video  Card 

This  removeable  integrated  circuit  card  performs  the 
signal  amplification  of  the  CCD  signal,  permits  zero 
restoration  of  the  offset  of  the  signal  which  is  obtained 
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from  Che  CCD,  performs  a  "correlated  double  sampling' 
which  permits  the  use  of  an  Internal  CCD  reference  to 
provide  the  signal  from  which  the  optical  signal  is 
computed  as  a  differential.  This  printed  circuit  card 
also  buffers  the  analog  signal  to  reduce  vulnerability  to 
external  signals, 
e.  D-to-A  Card 

This  printed  circuit  card  has  a  dlgital-to-analog 
conversion  circuitry.  This  unit  receives  a  digital  signal 
from  a  memory  located  in  the  NOVA  minicomputer.  It  then 
converts  this  signal  Into  a  digital  signal.  This  digital 
signal  Is  buffered  and  adjusted  with  respect  to  gain. 

This  will  provide  a  signal  which  will  subtract  the 
variation  In  leakage  current  which  may  be  found  in  the 
CCD.  The  purpose  of  this  circuit  is  to  permit  the 
operator  to  utilise  the  highest  gain  possible  on  the 
monitor  which  views  the  output  of  the  Charge  Coupled 
Device.  This  Is  necessary  to  permit  rapid  Identification 
of  the  fainter  stars  In  the  FK4  catalog. 

Remote  Control  Unit  (RCU)  on  Camera  Control  Unit 

The  Remote  Control  Unit  is  an  electronic  subsystem  which 
Is  mounted  separately  in  a  conventional  19-inch  rack.  This 
unit  provides  a  variety  of  independent  functions.  In 
particular,  It  provides  the  drive  or  clock  voltages  required  by 
the  Charge  Coupled  Device  and  organizes  the  routing  of  various 
signals  and  controls  between  the  computer  and  the  CCD  Camera  on 


the  T-4  Theodolite 
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One  section  of  the  RCU  consists  of  a  read-only  memory  and 
microprocessor  which  creates  the  appropriate  pulse  trains.  By 
the  use  of  this  microprocessor,  the  RCU  generates  the  clock 
voltage  trains  for  scanning  the  CCD.  This  set  of  commands  for 
the  structure  of  the  clock  voltages  may  be  changed  by  the 
creation  and  Installation  of  a  new  Programmable  Read-Only 
Memory  (PROM). 

Another  section  of  this  system  selects  the  clock  voltages 
which  are  used  to  control  the  charge  transistor  on  the  CCD.  A 
set  of  front  panel  controls  permits  the  choice  of  a  variety  of 
different  tables  of  clock  voltages.  This  permits  the  control 
of  the  temperature  of  the  CCD.  This  may  be  set  at  any  point  by 
a  control  on  the  front  panel.  It  also  provides  the  temperature 
regulation  for  the  CCD.  It  acts  as  a  transmission  point  for 
the  data  from  the  CCD  to  the  minicomputer.  In  the  present 
configuration,  this  is  located  near  the  pier  to  permit  these 
adjustments  to  be  made  in  the  vicinity  of  the  CCD  Camera 
system.  It  also  provides  the  connection  point  for  converting 
from  the  fiber  optic  Information  to  the  copper  transmission  to 
the  computer. 

A  photograph  of  the  front  panel  of  the  Remote  Control  Unit 
appears  In  Figure  5.  This  Indicates  some  of  the  functions  of 
the  RCU,  or  the  CCD  camera  control  unit.  (RCU  Is  a  designation 
of  a  similar  unit  In  an  earlier  configuration  which  was  also 
used  in  the  earlier  test  of  the  Array  Eyepiece  System  on  loan 
from  the  Office  of  Naval  Research.) 


Figure  5 

Front  panel  of  the  Renote  Control  Unit 

The  Renote  Control  Unit  Is  in  an  enclosure  for  handling  In 
aettlng  It  up  at  the  pier.  The  current  version  of  this  unit  Is 
a  plastic  box  with  two  handles.  This  Is  designated  as  the  "RCU 
Enclosure.” 

4.  Minicomputer 

The  following  discusses  the  commercially  purchased 
equipment  which  has  been  supplied  by  the  University  of  Maryland 
in  the  van.  In  general,  these  items  are  under  warranty  (If  It 
has  not  expired).  The  warranty  procedures  and  information  are 
contained  in  the  van. 
a.  NOVA  4  Minicomputer 

The  NOVA  4  Minicomputer  (Model  4c)  operates  the 
overall  system.  This  Is  responsible  for  both  the  control 
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of  the  experiment  and  the  processing  and  routing  of  the 
output  data.  This  NOVA  4  Minicomputer  is  basically  a 
commercial  device.  However,  it  has  been  specially  adapted 
in  order  to  provide  a  more  rugged  and  more  operational 
unit  for  use  in  the  field.  This  has  primarily  resulted  in 
changing  the  physical  1/0  structure  of  the  NOVA  4 
Minicomputer  in  order  to  permit  connector  based 
interconnections  with  external  devices. 

b.  Digldata  Tape  Deck 

The  Digldata  Tape  Deck  (Model  1640)  and  Controller 
(Model  NCI)  are  used  in  the  system  in  order  to  record  the 
output  data.  This  is  recorded  in  real  time  and  permits 
processing  off-site  by  a  large  computer.  These  units  are 
mounted  in  the  rack  in  the  van. 

c.  Floppy  Dual  Disk  System 

The  programs  for  equipment  control  and  data  handling 
and  routing  are  resident  on  a  floppy  disk  system.  Inter¬ 
mediary  real  time  data  storage  is  also  performed  by  the 
floppy  disk  system.  This  unit  consists  of  a  dual  floppy 
system  by  Data  General  (Model  6030).  This  is  a  portion  of 
the  system  purchased  by  the  University  of  Maryland.  It 
was  provided  on  loan  to  AFGL/GSS/DMA  during  the  time  re¬ 
quired  to  adapt  the  FORTH  to  a  full  Winchester  disk  based 
system  which  is  capable  of  preliminary  field  reduction. 

Thus,  the  unit  in  the  van  is  one  on  loan  from  the 
University  of  Maryland  and  the  alternate  one  to  be 
Interfaced  with  the  new  FORTH  is  at  the  University  of 


Special  Printed  Circuit  Cards  for  the  NOVA  Minicomputer 

These  are  special  large  printed  circuit  boards  which  are 
Installed  In  the  NOVA  Minicomputer.  They  provide  specialized 
hardware /software  Interfaces  between  the  NOVA  Minicomputer  and 
other  equipment, 
a.  Patch  Generator  Card 

This  printed  circuit  card,  designed  and  fabricated  at 
the  University  of  Maryland,  accepts  the  digital  data  from 
the  Mark  V  Camera  Head  and  the  Remote  Control  Unit  and 
preprocesses  this  data  to  convert  It  Into  a  form  which  Is 
acceptable  for  the  NOVA  Minicomputer.  There  is  a  hardware 
selection,  by  a  software  provided  word,  of  a  patch  of  this 
data.  Thus ,  the  data  Is  preselected  by  the  hardware 
resident  on  the  patch  generator  card.  Thus,  the  NOVA 
Minicomputer  does  not  require  the  use  of  CPU  time  In  order 
to  perform  this  selection  procedure.  Just  prior  to  the 
second  series  at  U.S.  Naval  Observatory  this  was  modified 
to  provide  FIFO  (First  In,  First  Out)  buffering  on  the 
card.  This  modification  corrected  the  previously  observed 
problem  which  caused  a  considerable  delay.  In  particular, 
the  patch  generator  card  was  found  not  to  operate  on 
different  models  of  the  NOVA  Minicomputer.  This  was 
contrary  to  the  advertised  claim  that  these  units  were 
Identical.  The  engineering  staff  of  Data  General  also 
felt  that  they  were  identical  and  that  there  should  be  no 
such  difficulty.  However,  with  the  new  modification,  we 
are  able  to  operate  this  on  the  different  NOVA  models. 


The  patch  generator  card  Is  placed  in  the  computer. 
This  Is  in  Slot  5  (from  the  bottom,  starting  at  1). 
b.  Event  Timer  Printed  Circuit  Card 

The  "event  timer  card”  is  a  large  printed  circuit 
card  designed  and  fabricated  at  the  University  of 
Maryland.  The  primary  purpose  of  this  Interface  card  is 
to  provide  timing  references  for  the  photogate  pulses,  and 
the  ticks  from  the  reference  DMA  clock.  The  photogates 
define  the  time  of  exposure  of  the  CCD  and  thus  provide 
the  fundamental  reference,  equivalent  to  the  ticks  in  the 
manual  eyepiece.  The  ticks  from  the  Data  Metrics  DMA 
clock  provide  the  reference  to  WWV  time  as  determined 
within  the  Data  Metrics  clock.  Thus,  the  "event  timer 
card”  is  a  card  mounted  in  the  NOVA  minicomputer.  This  is 
mounted  in  Slot  7  and  has  eight  connectors  bringing 
Information  to  this. 

Circulating  Semiconductor  Memory 

The  Circulating  Semiconductor  Memory  (CSM)  is  a  printed 
circuit  card  which  has  been  developed  at  the  University  of 
Maryland.  This  printed  circuit  card  has  128k  of  RAM  memory. 
This  permits  the  storage  of  a  complete  array,  with  16  bit 
precision.  This  array  is  stored  in  order  to  permit  the 
subtraction  of  this  array  from  the  real  time  data  of  the  Charge 
Coupled  Device.  Various  timing  circuits  permit  this  data  to  be 
synchronized  with  the  scanning  of  the  Charge  Coupled  Device. 
Special  software  in  the  NOVA  Minicomputer  permits  the  recording 
and  processing  of  data  from  the  Charge  Coupled  Device  when  a 


31 


light  blocker  is  placed  over  the  lens  of  the  T-4  Theodolite. 
Thus,  one  gathers  the  background  leakage  current  and  stores 
this  in  the  Circulating  Semiconductor  Memory,  properly 
processed  in  order  to  permit  the  correct  value  and  timing  to  be 
subtracted  from  the  real  time  data  from  the  Charge  Coupled 
Device.  The  Circulating  Semiconductor  Memory  is  a  double  height 
card  which  is  located  in  slot  10  in  the  NOVA  minicomputer. 

7.  Image  Display 

The  image  display  system  consists  of  a  device  for  the 
conversion  of  the  computer  signals  to  X  and  Y  drives  and  proper 
Z  modulation  for  the  display  devices  and  monitors.  In  addition 
to  the  image  display,  we  also  have  a  video  terminal  which  per¬ 
mits  the  operator  to  control  the  computer  system,  data  record¬ 
ing  and  the  Charge  Coupled  Device.  This  control  is  actuated  by 
FORTH  operating  systems  which  are  discussed  separately.  The 
operation  of  these  programs  is  discussed  in  Appendix  I. 

8.  WWV  Receiver 

The  WWV  receiver  consists  of  a  Zenith  radio.  This  item  is 
government  furnished  equipment  to  the  University  of  Maryland. 
This  requires  an  outside  antenna  and  connection  to  the  Data 
Metrics  box. 

9.  Temporary  Equipment  in  Van 

This  consists  of  equipment  which  will  not  be  in  the  final 
van,  but  is  currently  used  for  diagnostic  material  during  the 
operations  at  the  Goddard  Optical  Research  Center. 

a.  Four  trace  oscilloscope 

b.  WWV  receiver 
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C.  Mechanical  Mounting 

The  CCD  camera  must  now  be  mounted  to  the  T-4  Theodolite.  This  is 
done  with  an  interface  unit  which  provides  adjustment  and  some 
focussing.  The  result  of  this  combination  is  the  completed  system  ready 
for  the  T-4  observation. 

D.  Observing  Sequences 

He  may  divide  this  into  three  observing  sequences. 

The  first  of  these  consists  of  various  configurations.  Thus,  for 
the  first  observing  sequence,  we  have  Configuration  101  at  GORF, 
Configuration  102  at  USNO,  Configuration  103  at  USNO. 

He  may  treat  the  data  from  each  of  these  configurations 
separately.  There  is  both  an  improvement  in  the  data  handling, 
observing  procedures,  equipment  uniformity. 

LED  flasher  tests  were  performed  which  enabled  direct  measurement 
of  timing  instabilities  in  data  recording.  These  results  suggested 
further  investigations  on  the  event  timer  and  CCD  patch  generator 
circuit  boards.  As  a  result  we  have  made  several  minor  circuit 
modification  to  both  of  these  boards.  Preliminary  tests  have  indicated 
that  electrical  glitches,  which  may  have  been  responsible  for  random 
timing  jumps,  have  been  eliminated. 

The  CCD  211  photo  array  sensor  circuit  board,  which  had  been 
modified  due  to  changes  in  electrical  specif iaction  from  the 
manufacturer,  has  been  completed.  Preliminary  tests  on  the  board  (not 
employing  the  sensor  array  chip)  have  been  done. 

The  new  X/Y/Z  display  driver  for  viewing  the  T-4  camera  image 
inside  the  van  has  been  completed.  Tests  have  been  performed  at  the 
shop.  It  appears  to  provide  a  much  Improved  resolution  of  the  camera 


33 


w' 

u'1 

L" 


image. 

The  entire  FORTH  software  package  for  the  system  has  been  updated 
into  a  more  efficient  package.  The  result  is  a  more  modular 
configuration,  which  will  permit  easier  implementation  of  both 
electronics  modular  changes  and  software  updates.  This  software  package 
has  been  successfully  Installed  and  checked  out  at  the  optical  site. 

E.  Observing  Series 

Observations  have  been  conducted  in  various  configurtions.  Some  of 
these  configurations  have  been  used  in  order  to  provide  information  on 
the  performance  of  the  system  at  a  time  prior  to  the  availability  of  the 
AFGL/DMA/GSS  equipment.  Thus,  in  the  initial  configurations  (and  in  the 
final  delivered  configuration)  conventional  copper  ribbon  cables  were 
used  between  the  Mark  V  CCD  Camera  Head  and  the  Remote  Control  Unit. 

The  initial  configuration  with  the  Remote  Control  Unit  used  the 
electronic  system  which  had  been  developed  for  the  Office  of  Naval 
Research  for  use  in  the  Multi-Aperture  Amplitude  Interferometer.  This 
initial  test  configuration  also  used  the  NOVA  3  minicomputer  system 
(including  the  NOVA  3  central  processing  unit,  the  magnetic  tape  drive, 
and  the  floppy  disk  drive)  on  loan  from  the  Electronics  Group  of  the 
University  of  Maryland.  This  series  of  tests  has  been  conducted  using 
an  electronics  system  which  was  not  designed  for  precision  timing  of 
data  from  CCDs,  but  was  designed  and  fabricated  for  the  Amplitude 
Interferometry  measurements,  which  involves  the  use  of  the  system  for 
photon  counting  with  an  intensified  CCD. 

The  later  observing  sequences  consisted  of  tests  of  the 
AFGL/DMA/GSS  equipment  replacing  individual  elements  in  this 
configuration.  A  portion  of  these  tests  consisted  of  the  use  of  the 


fiber  optic  camera.  However,  requested  upgrades  in  the  camera  system 
were  not  also  implemented  on  the  fiber  optic  camera.  In  addition,  the 
fiber  optic  transmitters/receivers  appears  to  have  a  problem  in  the  form 
of  a  finite  lifetime.  That  is,  their  output  has  been  gradually 
decreasing  as  a  function  of  time. 

The  delivered  system  consisted  of  the  equipment  described  in  a 
separate  section. 

F.  Results  of  Data  Reduction 

In  this  section,  we  address  the  results  of  the  data  reduction. 

1.  Determination  of  Epoch 

The  first  portion  of  the  precedure  to  determine  the  epoch 
of  a  given  star  is  to  evaluate  the  internal  precision  one  may 
expect  from  repeated  measurements.  This  will  involve  two  types 
of  error,  or  uncertainty,  in  the  epoch.  The  first  contribution 
is  due  to  the  random  noise  generated  in  the  preamplifier. 
Smaller  similar  contributions  to  the  overall  noise  are  due  the 
random  noise  caused  by  the  Poisson  variations  in  the  leakage 
current  and  the  Poisson  noise  in  the  light  which  comes  from  the 
background  brightness  of  the  sky.  However,  the  latter  two 
effects  are  seldom  important. 

As  discussed  in  the  proposal,  we  derive  a  quasi- 
theoretlc.al  relation  between  precision  and  stellar  magnitude  in 
the  following  form: 
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TABLE  1.  Relation  Between  Precision  and  Stellar  Magnitudes 


Relative  Readout 
Noise 

Number 
of  ’’Wires” 

Desired  Accuracy 
0.03"  0.1" 

CCD 

202 

300 

99 

4.3 

6.0 

CCD 

211 

50 

189 

6.6 

8.3 

CCD 

221 

50 

379 

7.3 

9.0 

I  CCD 

202 

1 

99 

8.9 

11.5 

I  CCD 

211 

1 

189 

9.3 

11.8 

The 

actual  internal 

agreement  which 

we  have 

found  may  be 

illustrated  by  the  following  table  on  the  latest  observation. 

In  the  discussion  of  the  actual  data,  we  must  now 
distinguish  between  the  performance  of  the  CCD  camera,  image 
motion,  and  a  group  of  other  errors  which  we  shall  combine 
(Trunion  axis,  catalog,  spirit  levels,  etc.).  This  division  is 
somewhat  arbitrary  but  will  help  to  illustrate  the  procedure. 
Table  1  refers  to  theoretical  calculations  of  the  Internal 
error,  based  upon  measured  parameters  for  the  CCD  202  and 
projected  parameters  for  other  devices.  On  the  other  hand,  if 
we  consider  field  astroposition  observations  of  stars,  we  may 
have  internal  errors  of  the  order  of  one  milliarcsecond  ,  or 
somewhat  larger,  as  the  average  star  error  during  the  night. 
This  is  addressed  in  Table  2.  The  numbers  in  the  theoretical 
table  were  rather  conservative,  compared  to  actual  operational 
equipment,  in  two  respects.  First,  we  are  using  the  202,  but 
its  noise  is  running  on  the  order  of  50  or  60  electrons.  In 
addition,  we  are  using  the  full  spectral  range  rather  than  just 
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Che  visual  variance.  These  Improvements  permit  agreement  with 
the  high  internal  precision  found  in  this  data. 

However,  a  phenomena  such  as  image  motion  will,  over  the 
time  period  involved,  provide  a  random  component  of  the  order 
of  0.1  arcseconds.  Thus,  the  Table  was  realistic  as  well  as 
properly  defined  (it  addressed  only  the  array)  in  the 
reproduceability  from  one  determination  to  the  next. 

TABLE  2.  Summary  of  Geodetic  Data 


DATE  (GCD) 

R 

SD* 

D 

SD* 

12/01/81 

0.9508 

0.0014 

0.572 

0.066 

12/10/81 

0.9521 

0.0016 

0.525 

0.025 

12/17/81 

0.9512 

0.0009 

0.476 

0.027 

*  s  Standard  Deviation  (Unit) 

R  :  Equatorial  Width  of  One  Pixel 

D  :  Equatorial  Width  of  Photosensitive  Part  of  Pixel 

LONG:  Observed  Difference  in  Longitude  to  be  Applied  to 
-05"  07"  18.9 

The  above  discussion  is  a  criteria  for  evaluation  but  not 
the  actual  Internal  agreement  of  stars  through  the  night.  In 
order  to  determine  the  latter,  we  may  look  at  the  Internal 
agreement  of  a  single  star.  This  is  a  number  not  dissimilar 
from  the  standard  deviation  of  the  width  of  a  cell,  but  it 
cannot  be  cross-checked.  If  we  cross-check  from  one  star  to 
another,  we  find  the  larger  number  of  0.03  seconds  of  time,  or 
0.5  arcseconds.  A  portion  of  this  uncertainty,  and  probably 
the  major  constituent,  is  due  to  the  image  motion  caused  by  the 
turbulence  and  fluctuations  in  the  earth's  atmosphere.  These 
would  be  predicted  to  have  a  fluctuation  in  this  time  of  this 
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magnitude.  However,  analysis  has  not  been  carried  out  to  date 
as  to  the  separation  of  the  atmospheric  phenomena  and  various 
effects  which  might  be  attributed  to  the  structure  of  the  T-4 
Theodolite.  Note  that  within  this  variation,  or  uncertainty, 
all  of  the  short  term  motions  of  the  trunlon  axis,  the  azimuth 
axis,  and  other  mechanical  parts,  such  as  the  interface  between 
the  camera  and  the  telescope,  are  included. 

2.  Evaluation  of  the  Geodetic  Determinations  of  Longitude 

In  this  section,  we  wish  to  consider  both  the  precision 
and  the  accuracy  for  the  determination  of  astronomical  longi¬ 
tude  using  the  Array  Eyepiece  System  on  the  T-4  Theodolite. 

In  order  to  permit  an  internal  comparison  in  which  we 
include  the  capabilities  and  skill  of  a  standard  observing 
crew,  we  shall  address  in  this  section  data  which  has  been 
collected  by  personnel  of  the  Geodetic  Survey  Squadron  and 
analyzed  by  Mr.  Rudolf  Slavermoser  and  the  personnel  of  the 
Geodetic  Survey  Squadron  in  Cheyenne,  Wyoming.  In  particular, 
we  consider  the  data  for  the  interval  from  29  April  1982  to  11 
May  1982  which  was  recorded  at  the  U.  S.  Naval  Observatory  In 
Washington.  This  was  performed  with  one  set  of  equipment. 

This  equipment  was  then  replaced  almost  entirely  with  the 
equipment  to  be  delivered  to  the  Geodetic  Survey  Squadron. 

The  second  interval  from  13  May  1982  to  8  June  1982  was 
recorded  by  personnel  of  the  Geodetic  Survey  Squadron  and 
represents  the  equipment  that  was  transferred  to  them. 


TABLE  3.  CCD  Mark  V  Project,  "Old  System  Night  Results 


1982 

Local 

Date 

Astronomic 
Longitude 
for  Night 
Sec. 

Residual 

from 

Standard 

Sec. 

Standard 
Error 
of  Mean 
Sec. 

Number 

of 

Set  8 

No.  of 
Stars 
Obs.  Acc. 

29  April 

58.04 

-  0.19 

+  0.219 

2 

14 

12 

03  May 

58.12 

-  0.11 

+  0.102 

4 

33 

32 

04  May 

58.42 

+  0.19 

+  0.091 

4 

33 

32 

05  May 

58.09 

-  0.13 

+  0.093 

5 

36 

35 

06  May 

58.21 

-  0.02 

+  0.097 

5 

36 

32 

10  May 

58.32 

+  0.09 

+  0.102 

4 

28 

25 

11  May 

58.01 

-  0.22 

+  0.087 

3 

22 

20 

TOTALS 

Weighted  Mean: 

:  58.19 

-  0.04 

27 

202 

188 

Standard  Error  of  the  Mean:  +  0.056 

Standard  Error  of  a  Single  Night:  +  0.147 


NOTES:  Standard  Longitude:  77*03  58.23  W  +  0.0086  SE 

Based  on  Danjon  Astrolabe  Results  from  1969-1978  observations. 
Results  Include  final  UT1  time  and  CIO  pole  corrections. 
Weights  for  each  night  are  the  number  of  acceptable  stars. 

Observer:  Bernard  Instrument:  Wild  T4-120741 

Chronometer:  Datametrics  231 
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Table  4.  CCD  Mark  V  Project,  "New"  System  Night  Results 


Astronomic  Residual  Standard 


1982 

Local 

Date 

Longitude 
for  Night 
Seconds 

from 

Standard 

Seconds 

Error 
of  Mean 
Seconds 

Number 

of 

Set6 

No.  of 
Stars 

Obs.  Acc 

13  May 

58.39 

+  0.16 

+  0.098 

2 

17 

16 

25  May 

58.25 

+  0.02 

+  0.061 

4 

26 

26 

26  May 

58.25 

+  0.02 

+  0.070 

5 

33 

32 

01  June 

58.12 

-  0.11 

+  0.068 

5 

27 

27 

02  June 

58.13 

-  0.10 

+  0.085 

3 

29 

26 

07  June 

57.98 

-  0.25 

+  0.104 

3 

21 

21 

08  June 

58.15 

-  0.08 

+  0.130 

2 

11 

11 

TOTALS 

Weighted  Mean: 
Standard  Error 
Standard  Error 

58.18  -  0.05 

of  the  Mean: 
of  a  Single  Night: 

+  0.046 
+  0.121 

24 

164 

159 

NOTES:  Standard  Longitude 

:  77  03  58. 

23  W  +  0.0086  SE 

Based  on  Danjon  Astrolabe  Results  from  1969-1978  observations. 
Results  Include  preliminary  UT1  time  and  CIO  pole  corrections. 
Weights  for  each  night  are  the  number  of  acceptable  stars. 


Observer:  Courbis 
Chronometer:  Datametrlcs  231 


Instrument:  Wild  T4- 120741 
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In  order  to  aeke  a  cross-comparison,  we  now  form  a  table 
to  describe  this  data. 


TABLE  5.  Sumary  of  the  Results  of  Longitude  Determination  at  USNO 


April  -  May 

May  -  June 

Difference  of 
Two  Runs 

Equipment 

UM/0NR 

Weighted  Mean 
of  Longitude 

77°03f58!l90 

77°03*58?180 

0?010 

Standard  Error  of  the 
Mean  for  the 

Weighted  Mean 

o!056 

0?046 

0?072 

Standard  Error 
of  a  Single  Night 

0ll47 

0?121 

Thus,  we  find  the  Internal  agreement  of  these  two  measures 
to  be  .01  it  .08  and  the  accuracy  to  be  -  .04  ±  .08.  For 
coaiperlson,  a  standard  determination  is  approximately  0.28 
arcseconds. 

Further  data  was  taken  after  the  completion  of  this 
contract  at  the  U.S.  Naval  Observatory  which  will  be  addressed 
In  sore  detail  in  a  separate  paper. 

G.  Overall  Conclusions 

The  overall  conclusion  which  one  may  derive  from  both  this  data  and 
data  performed  after  the  termination  of  this  contract  consists  in  the 
stateisent  that  the  equipment  Is  performing  significantly  better  than  may 
be  performed  by  a  manual  observer.  In  particular,  this  is  in  reference 
to  the  results  obtained  with  the  GSS  study  for  the  internal  agreement  of 
several  different  observers.  The  results  at  the  U.S.  Naval  Observatory 
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also  Indicated  performance  that  was  better  than  any  single  observer 
(single  observers  in  the  GSS  study  were  internally  more  consistent  than 
combining  all  observers).  There  initially  appeared  to  be  offsets  in  the 
data  when  the  equipment  was  changed  (at  the  U.S.  Naval  Observatory  site) 
from  the  equipment  of  the  U.S.  Office  of  Naval  Research  to  the 
AFGL/DMA/GSS  equipment.  However,  re-analysis  in  terms  of  proper  use  of 
the  earth  rotation  data  indicated  that  this  offset  was  less  than 
significant. 

It  is  believed  that  with  suitable  flasher  calibration  conducted  by 
the  operating  crew,  such  a  recalibration  would  not  have  been 
necessary.  However,  this  has  not  been  verified. 
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IX.  SOFTWARE 

In  this  section,  we  consider  in  more  detail  the  software  which  has 
been  developed  within  this  program  to  both  operate  the  CCD  Array 
Eyepiece  System  and  to  analyse  the  data  which  has  been  obtained  from  the 
CCD  Array  Eyepiece  System. 

This  software  which  has  been  developed  for  use  with  the  University 
of  Maryland  Array  Eyepiece  System  operated  on  the  T-4  Theodolite 
addresses  two  areas  in  particular.  These  consist  of  the  operational 
software  and  the  data  analysis  software.  The  operational  software  is 
used  at  the  same  time  during  which  observations  are  taken.  It  provides 
the  operational  commands  and  procedures  for  the  operation  of  various 
elements  of  the  equipment  and  provides  for  the  reception,  re-formattlng, 
and  recording  on  magnetic  media  of  the  data  output  of  the  observation. 
The  analysis  software  Is  used  after  the  completion  of  the  observations 
In  an  off-line  manner.  This  software,  which  was  developed  at  the 
University  of  Maryland,  Is  typically  used  on  either  the  Eclipse  system 
at  the  University  of  Maryland  or  the  Data  General  VAX  at  the  Geodetic 
Survey  Squadron  in  Cheyenne,  Wyoming.  This  overall  program  structure 
has  been  successfully  transferred  to  the  VAX  computer  at  Cheyenne.  Most 
of  the  discussions  of  the  details  of  these  programs  and  their  procedures 
will  be  addressed  in  various  appendices  and  in  separate  documents.  In 
this  section,  we  shall  primarily  review  their  relationship. 

A.  Operational  Software 

The  operational  software  is  defined  as  that  software  which  is 
required  to  support  the  field  operation  of  the  system.  This  software 
may  be  logically  divided  Into  two  parts.  The  major  portion  Is  the 
software  which  is  required  for  the  operation  of  the  NOVA  minicomputer 
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and  for  the  operation  of  the  special  purpose  printed  circuit  cards 
developed  by  the  University  of  Maryland.  The  second  portion  of  this 
software  consists  of  the  one  part  which  is  resident  in  the  CCD  Camera 
Control  Unit.  This  consists  of  the  program  which  operated  the 
microprocessor  in  the  CCD  Control  system. 

1.  NOVA  Operational  Software 
a.  Objectives 

The  objectives  of  the  NOVA  operational  software 
consist  of  the  following: 

(1)  Control  of  Hardware  data  compaction 

The  data  is  compacted  in  a  specially  built 
University  of  Maryland  card.  The  parameters  to 
properly  operate  this  card  in  a  dynamic  fashion, 
related  to  the  motion  and  position  of  the  star,  fs 
controlled  within  the  NOVA  operational  software. 

(2)  Data  Formatting 

The  data  is  reformatted  into  records  which  have 
the  appropriate  data  for  analysis  at  a  later  time. 

These  are  collected  and  then  written  to  magnetic  tape. 

(3)  Display 

To  provide  the  operator  with  a  display  of  the 
system  status  and  operation. 

(4)  Circulating  Memory  Structure 

This  receives  data  from  the  CCD  Camera  Eyepiece, 
restructures  it  and  loads  this  into  the  Circulating 
Memory.  It  then  controls  the  transmission  of  this  data 
to  the  Camera  Head  for  real  time  background 


subtraction 


(5)  Timing  Information 

This  consists  of  reading  and  operating  the  printed 
circuit  card  developed  at  the  University  of  Maryland  to 
provide  timing  for  the  operation  of  the  CCD  and, 
separately,  for  the  reference  clock  in  the  Data 
Metrics.  Auxiliary  ports  are  provided  for  other 
comparative  information  as  so  desired, 
b.  Description 

A  description  of  the  functions  of  the  NOVA  software 
is  attached  as  Appendix  V  from  a  previous  document.  This 
has  some  modification  to  bring  it  up  to  date  but  basically 
is  as  was  described  in  that  document. 

The  code  for  this  appears  as  Appendix  VI. 

CCD  Control  Unit  Software 
a.  Objectives 

The  objectives  of  the  software  contained  in  the  CCD 
Control  Unit  consist  of  the  following: 

(1)  Creation  of  CCD  Scan  Pattern 

This  creates  a  scan  pattern  with  the  appropriate 
rows,  columns,  and  overlays. 

(2)  Clock  Voltage  Trains 
These  are  the  clock  voltage  trains  required  to 

operate  the  CCD  and  transfer  the  charge  in  a  proper 
manner  to  the  preamplifier  and  operate  the 
preamplifier. 
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(3)  Clock  Voltage  Selection 

These  are  responsible  for  the  selection  of  the 
proper  set  of  clock  voltages  for  the  appropriate 
temperature.  These  are  contained  In  a  ROM  burned  table 
and  the  software  permits  the  direct  operator  change  of 
these  In  order  to  fine  tune  operation. 

b.  Description 

More  detailed  description  of  the  functions  has  been 
briefly  in  other  documents. 

c.  Availability 

The  details  of  this  software,  as  It  Is  written  In 
machine  code,  la  attached  In  an  appendix. 

B.  Analysis  Software 

1.  Objective 

The  objectives  of  the  analysis  software  consists  of 
transforming  the  field  data  which  appears  on  digital  magnetic 
tape  Into  information  which  may  be  used  as  an  Input  to  the 
Geodetic  Survey  Squadron  programs. 

Thus,  we  wish  to  convert  the  intensities  recorded  during 
an  observation  (which  consist  of  200,000  16-bit  numbers)  Into  a 
single  timing  numbers  with  attendant  parameters  on  Internal 
accuracy  and  structural  integrity. 

2.  Description 

The  analysis  software  has  undergone  considerable 
evolution.  There  have  been  two  major  versions.  These  have 
been  the  so-called  Generation  I  (or  GEN  I)  and  Generation  III 
(GEN  III)  Programs.  The  GEN  I  program  performed  the  analysis 
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in  the  manner  which  was  more  tolerant  of  hardware  and 
hardware/software  variations.  This  summed  the  intensity  in  a 
vertical  set  of  10  rows.  The  increase  in  this  data  provided 
the  signal  which  one  analyzed.  This  has  the  advantage  that  it 
is  less  affected  by  analysis  of  the  two  independent  fields.  In 
addition,  it  is  tolerant  of  irregularities  in  the  motion  of  the 
defining  patch.  The  required  computer  time  is  considerably 
lower. 

The  GEN  II  Program  was  developed,  but  not  put  into  actual 
production  run. 

The  GEN  III  Program  analyzes  the  intensity  of  each  pixel 
independently  and  optimizes  the  results.  This  technique  is 
less  sensitive  to  background  and  produces  a  significantly 
higher  accuracy.  On  the  other  hand,  it  requires  considerably 
more  computer  time.  For  this  reason,  a  decision  should  be  made 
concerning  when  one  wishes  to  get  reasonable  results  on  faint 
stars,  and  when  one  wishes  to  save  computer  time. 

A  more  complete  discussion  of  this  distinction  and  the 
various  approaches  was  presented  in  the  Quarterly  Reports. 

3.  Documentation 

The  Generation  I  program  is  described  in  Appendix  II. 

The  Generation  III  program  is  briefly  described  in 
Appendix  VII.  A  fuller  documentation  of  this  will  be  provided 
at  a  later  time. 

The  code  of  Generation  III  is  provided  in  Appendix  VIII. 


X.  OPERATING  MANUAL 


The  "Operating  Manual"  has  been  created  to  summarize  the  entire  CCD 
Array  Eyepiece  System  from  an  operational  point  of  view.  This  Includes 
the  equipment  required,  operating  procedures,  data  handling,  and  data 
processing.  This  Is  an  evolving  document  and,  at  present.  Is  an 
Intermediary  draft.  However,  It  has  the  following  Interesting  Items. 

A.  Required  Equipment 

The  required  equipment  describes  the  equipment  which  was  supplied 
with  the  operating  van. 

B.  Observing  Procedure 

The  operating  procedure  consists  of  the  steps  and  procedures 
required  In  order  to  set  up  the  equipment,  take  data,  and  record  the 
data. 

C.  Data  Handling  Procedures 

The  data  handling  procedures  consists  of  a  description  of  the 
procedures  conducted  at  the  University  of  Maryland  and  a  rough 
description  of  the  procedures  conducted  by  Rudl  Salvermoser  and  by  the 
Geodetic  Survey  Squadron.  The  latter  two  serve  as  comparative 
descriptions,  not  necessarily  the  requirements  for  the  operation  of  the 


experiment 


XI.  RESULTS 


The  overall  results  obtained  by  using  the  CCD  eyepiece  with  the  T-4 
Theodolite  show  excellent  agreement  and  an  improved  precision  with 
respect  to  the  conventional  observations  with  the  T-4.  The  initial 
proposal  stated  that  the  CCD  eyepeice  should  be  expected  to  do  as  well 
as  the  T-4  with  no  assurance  of  Improvement.  There  are  three  major 
sources  of  error:  the  effects  of  anamolous  refraction  in  the  atmosphere, 
the  personal  equation  of  the  operator,  and  the  wobble  of  the  trunion 
axis.  We  may  only  expect  to  reduce  the  impact  of  the  personal  equation 
problem  with  the  use  of  the  CCD  eyepiece.  Since  we  do  not  know  the 
balance  of  these  various  effects,  we  cannot  determine  the  Improvements, 
but  only  demonstrate  that  the  data  may  be  obtained  in  an  impersonal 
manner  without  a  trained  optical  observer.  However,  the  results  quoted 
earlier  Indicate  that  we  have  in  fact  reduced  the  standard  deviation  of 
a  night,  or  the  night  error,  from  the  value  for  a  typical  observer  (0.28 
arcsecond)  down  to  a  night  error  of  0.13  arcsecond.  One  might  hope  that 
this  goes  further  and  that  we  continue  to  try  to  separate  out  various 
error  sources  in  order  to  more  correctly  evaluate  the  performance  of  the 
instrument.  However,  its  performance  at  this  time  i6  at  the  level 
beyond  that  originally  discussed  in  the  proposal. 

Limiting  magnitude  (or  faintest  star  which  may  be  observed)  depends 
upon  the  spectral  type,  or  color  of  the  star.  This  lies  between  4.5  and 
6.0  for  the  visual  magnitude. 

The  procedure  for  the  acquisition  of  the  stars  seems  to  be 
reasonable  in  terras  of  d-  ,riculty.  However,  we  are  supplying  a 
Circulating  Semiconductor  Memory  (CSM),  which  is  to  be  installed 
shortly. 
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The  software  Is  operational  and  additional  improvements  are  being 
supplied. 


XII.  PERSONNEL 
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used  for  the  analysis  systems  and  programs  at  the  University  of 
Maryland. 


DOUGLAS  G.  CURRIE,  Professor  of  Physics  and  Astronomy 

Dr.  Currie  is  the  Principal  Investigator  for  this  project.  He 
developed  the  original  concept  for  the  use  of  a  CCD  to  perform  high 
accuracy  astroposltlon  measurements  and  has  guided  this  project  at  the 
University  of  Maryland  to  Implement  this  concept. 


ANDREW  DANTZLER 

Mr.  Dantzler  has  aided  in  the  observations,  in  the  site 
development,  and  in  various  aspects  of  the  laboratory  support  of  this 
program. 

JOHN  J.  GIGANTI,  Design  Engineer 

Mr.  Gigantl,  who  is  also  Director  of  the  Electronics  Development 
Group,  has  been  and  is  responsible  for  guiding  the  design  of  most  of  the 
electronic  subsystems  required  in  the  CCD  Array  Eyepiece.  He  is  also 
responsible  for  the  fabrication  and  development  of  this  equipment. 
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JOHN  L.  HERSHEY,  Visiting  Associate  Professor 

Dr.  Hershey  developed  an  initial  set  of  programs  to  process  data 
from  the  Mark  IV  Camera  Head.  He  has  developed  and  run  the  programs  to 
determine  the  timing  of  meridian  passage  with  the  use  of  the  CCD  as  it 
is  used  in  the  astroposition  application.  He  aids  in  the  conduct  of  the 
field  observations  and  provides  an  evaluation  of  the  quality  of  the 
data.  He  is  involved  with  the  development  of  further  programs  which 
will  minimize  the  influence  of  various  electronic,  environmental,  and 
astronomical  sources  of  errors. 

JOSEPH  G.  MATHEWS,  Data  Processing  System  Analyst 

Mr.  Mathews  is  responsible  for  the  design  of  a  significant  number 
of  the  component  subsystems. 
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Mr.  Meraldi  has  designed  and  fabricated  the  interface  between  the 
T-4  Theodolite  and  the  Mark  II  Camera  Head,  as  well  as  the  Mark  V  Camera 
Head.  Several  versions  have  been  fabricated  and  tested.  He  has  also 
aided  in  the  definition  of  the  modifications  required  for  the  T-4 
Theodolite  in  order  to  permit  the  T-4  observations. 

RUDOLF  SALVERMOSER 

Mr.  Salvermoser  is  an  employee  of  the  Geodetic  Survey  Squadron  of 
the  Defense  Mapping  Agency.  Mr.  Salvermoser  has  been  working  closely 
with  the  University  of  Maryland  in  order  to  provide  an  evaluation  of  the 
Array  Eyepiece  System  for  the  T-4  Theodolite.  Mr.  Salvermoser  has 
performed  all  of  the  T-4  observations,  operating  the  T-4  Theodolite.  He 


has  also  performed  the  data  reduction  to  convert  the  meridian  passage 
time,  which  Is  produced  by  the  analysis  programs,  and  form  a  nominal 
determination  of  longitude. 

FREDERICK  C.  WIRE,  Research  Programmer 

Mr.  Wire  has  been  responsible  for  the  development  of  the  NOVA 
software  required  for  the  operation  of  the  system.  He  has  also  been 
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subsystems.  Mr.  Wire  has  also  aided  in  the  observations  conducted  that 
the  AIP  Site  at  GORF. 

DAVID  M.  ZIPOY,  Professor  of  Astronomy 
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microprocessor  used  to  control  the  scanning  and  data  sampling  of  the 
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the  procedures  required  in  order  to  operate  the  various  scanning  and 
interrogation  modes  which  may  be  used  for  the  Mark  V  Camera  Head.  These 
modes  are  required  both  for  normal  operation,  for  system  development  and 
for  system  evaluation. 


53 


APPENDIX  I 
Te rminologies 

Within  the  University  of  Maryland  program  for  the  development  of  a 
new  system  for  astroposltioning,  and  particularly  in  the  area  of  data 
analysis,  various  local  terminologies  have  developed  to  describe  the 
system  and  its  behavior.  In  the  interest  of  retaining  communications 
among  the  various  groups  who  are  Interested  in  the  details  of  such  a 
system,  this  section  describes  these  terminologies  in  a  more  generally 
recognized  language  and  should  permit  the  interpretation  of  these  terms. 

COLUMN  RECORD  OR  PROFILE 

The  column  record,  or  profile,  is  a  brightness  as  a  function  of 
time  in  a  single  column.  Ideally,  this  has  a  form 


where  the  dashed  curve  indicates  an  ideal  form  or  very  good  seeing  and 
the  solid  curve  indicates  a  more  typical  curve  for  our  current 


configurations 


This  is  a  phenomenon  which  occurs  in  the  Fairchild  Charge  Coupled 
Device.  This  is  typically  related  to  the  use  of  non-optimal  clock 
voltages  at  the  operating  temperature.  These  may  also  be  an  absolute 
temperature  effect.  This  phenomenon  appears  as  a  second  peak,  as 
illustrated  below  in  Figure  8. 


Figure  8 


This  illustrates  the  magnitude  of  the  signal  (in  A  to  D  units)  summed 
over  eight  rows  in  one  column.  This  is  as  a  function  of  time,  or  for 
successive  frames. 

The  ghost  is  separated  from  the  main  peak  by  approximately 
1 /cos (declination)  seconds  of  time.  Its  magnitude  may  range  between 
zero  and  0.4  of  the  strength  of  the  primary  peak.  This  depends  on  the 
equipment  and  temperature.  Depending  upon  the  optical  configuration, 
the  ghost  may  either  lead  the  main  peak  in  time  or  lag  the  "true” 
pulse.  The  figure  Illustrates  the  latter  case. 

PRECURSORS,  OR  ASYMMETRIES 

In  the  April  IS  data  only,  a  low  amplitude,  broad  (in  time) 
augmentation  of  the  primary  signal  has  been  seen  either  before  or  after 
the  primary  pulse.  These  have  attributed  to  a  variety  of  effects. 
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However,  this  generally  refers  to  something  of  the  form 


FIGURE  9 


GEN  I  PROGRAM 

This  is  a  family  of  computer  programs  which  analyze  the  data  in 
order  to  determine  the  time  at  which  the  star  crossed  the  meridian.  It 
performs  calculations  upon  data  which  is  obtained  from  the  total  signal, 
or  column  record,  obtained  by  summing  the  signals  in  the  individual 
pixels  in  one  column  and  in  several  rows.  It  is  most  frequently  used 
when  the  star  is  crossing  the  array  computer  in  an  approximately 
horizontal  (l.e. ,  parallel  to  a  row)  manner. 

GEN  III  PROGRAM 

Also  known  as  Diagonal  Program,  TWOD,  and  Array  Program.  The 
program  can  model  the  passage  of  a  star  across  the  array  at  any  angle. 
An  approximate  ephemerls  for  the  motion  is  adopted  and  differentially 
corrected  until  it  can  generate  the  amount  of  light  detected  by  each 
pixel  in  the  neighborhood  of  the  star  for  each  of  several  thousand 
frames  ("exposures"). 
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APPENDIX  II 

COMPUTER  ANALYSIS  OF  LONGITUDE  DATA 
FROM  THE  UNIVERSITY  OF  MARYLAND  ARRAY  EYEPIECE 
(COLUMN- CROSSING  ANALYSIS) 

by 

John  Hershey 
and 

Larry  Bleau 

ABSTRACT 

This  document  describes  one  level  of  analysis  of  data  from  the  University 
of  Maryland  Array  Eyepiece  System  (UMAES)  as  used  on  a  T-4  Wild  Theodolite. 

The  Array  Eyepiece  electronic  system  is  described  in  The  Array  Eyepiece  System 
for  the  Wilde  T-4  Theodolite. 

There  are  two  major  programs  which  make  up  the  column  crossing,  or 
'Generation  I”  process.  The  first,  CCDTAPE ,  reads  the  original  data  tape  and 
performs  a  relatively  simple  sorting  process  on  the  data,  producing  as  Its 
output  disk  files  organized  as  input  for  the  second  program.  CCDRED  needs  to 
be  run  only  once  for  each  data  tape,  and  produces  as  output  a  separate  disk 
file  for  each  passage  of  a  star  across  the  array. 

The  second  program,  CCDRED,  examines  the  light  intensity  over  a 
particular  column  of  the  CCD  array  as  a  function  of  time,  searching  for  the 
profile  of  a  star.  For  each  column,  the  characteristics  of  the  star's 
profile,  if  present,  are  determined.  This  process  is  repeated  with  each 
column  of  the  CCD  array  for  which  data  was  recorded.  After  all  columns  have 
been  processed,  a  linear  least  squares  fit  to  the  times  of  column  crossing  is 
made.  The  residuals  from  the  fit  are  used  to  eliminate  any  defective  values 
from  the  time  of  meridian  determination. 

The  time  of  instrument  meridian  is  determined  by  means  of  column  crossing 
times  before  and  after  instrument  reversal. 
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I.  INTRODUCTION 


A.  Brief  Description  of  the  Analysis 

This  document  describes  the  computer  analysis  of  data  taken  from  a  T-4 
Theodolite  equipped  with  a  diode  array  (CCD)  in  an  observation  mode  for 
longitude  determination.  The  longitude  is  found  from  the  Information  recorded 
from  the  crossing  of  a  star  image  over  columns  of  pixels  on  the  CCD  array. 

This  type  of  analysis  is  called  the  "Generation  I”  mode. 

There  are  two  major  program  units  in  the  Gen  I  system.  The  first, 
CCDTAPE,  reads  the  original  data  tape  and  performs  a  relatively  simple 
preprocessing  of  the  data,  producing  as  its  output  disk  files  organized  by 
diode  array  column  number  for  the  second  program. 

The  second  program,  CCDRED,  examines  the  time  variation  of  light 
intensity  over  each  column  of  the  CCD  array  as  a  function  of  time,  searching 
for  the  profile  of  a  star.  If  a  profile  is  found,  its  characteristics  are 
determined  and  saved. 

The  time  of  meridian  is  determined  by  taking  means  of  column  crossing 
pairs  which  result  from  reversing  the  T-4  Theodolite  as  the  star  crosses  the 
meridian.  The  crossing  of  the  array  columns  is  analogous  to  wire  crossing  or 
contact  times  in  visual  operation  of  the  Theodolite. 

B.  Oitline  of  the  "Generation  I”  or  Column  Crossing  Analysis  for  Time  of 

Meridian  Determination 

1.  Tape  generated  by  UMAES  at  the  T-4  Theodolite  containing  timing 
information  and  pixel  light  energies  from  the  small  patch  area  of  the 
diode  array. 

2.  Tape  read,  and  energies  of  pixels  sorted  by  diode  array  column 
number.  Program  CCDTAPE.  Disk  file  created  with  array  pairs  of  time 


and  energy  for  each  column.  One  file  created  for  each  8tar  passage 
across  the  array. 

Disk  file  read,  column  by  column.  Program  CCDRED.  Each  Energy-time 
array  pair  contains  an  energy  profile  as  a  function  of  time, 
representing  the  passage  of  the  star  across  the  diode  column,  if  a 
star  was  present.  Qualitatively  this  is  a  bell-shaped  profile,  where 
the  peak  represents  the  star  centered  on  the  column. The  profile  is 
fitted  mathematically  and  a  time  of  centering,  or  two  half-power 
points  are  extracted.  The  timings  for  each  column  are  stored.  After 
all  column  times  are  determined  a  linear  fit  to  column  crossing  times 
is  made  and  stored.  The  residuals  from  the  fit  are  used  to  eliminate 
defective  crossing  times.  For  a  longitude  observation,  the  above  is 
carried  out  twice,  once  for  before  ("IN")  and  once  after  ("OUT") 
telescope  reversal  across  the  meridian. 

Column  crossing  times  read.  The  crossing  times  of  "IN”  and  "OUT"  are 
checked  for  matching  column  pairs,  and  are  printed  out  if  both  are 
present.  The  means  of  pairs  and  their  error,  along  with  many  other 
parameters  of  interest,  are  printed  out.  The  mean  of  all  column 
pairs  is  computed,  printed  out,  and  written  to  a  "night  file"  as  the 
time  of  instrument  meridian  passage. 


II.  DATA  PREPROCESSING  (From  Tape  to  Disk)  (CCDTAPE) 

The  purpose  of  CCDTAPE  is  to  transform  the  recorded  T-4  data  from 
magnetic  tape  to  disk  in  a  form  more  usable  to  the  Generation  I  program  CCDRED 
(known  as  EPOCH  on  the  Eclipse  system).  Since  CCDRED  requires  a  series  of 
star  profiles  over  time  for  each  column  of  the  CCD  array,  the  primary  task  of 
CCDTAPE  is  to  reduce  the  two  dimensional  data  contained  in  a  frame,  usually  10 
by  8  pixels  in  size,  or  less,  to  one  dimensional  data,  with  one  point  per 
frame  associated  with  each  column.  This  is  done  by  averaging  the  pixels  in 
each  column  in  the  frame  and  associating  the  mean  with  that  column  number  and 
the  frame's  time,  making  a  triple  (e,  t,  C).  Here  ”e"  (energy)  is  the 
adjusted  mean  of  pixels  in  column  ”C"  at  frame  time  "t".  The  star's  profile, 
as  seen  by  CCDRED,  is  a  series  of  energy-time  pairs  (e,  t)  for  each  column 
that  was  recorded. 

The  operations  of  CCDTAPE  can  be  broken  down  into  four  phases: 
initialization,  reading  physical  tape  records,  processing  frames,  and 
constructing  the  proper  triples  (e,t,C).  All  phases  are  performed  repeatedly 
except  the  initialization  phase,  which  is  executed  once  at  the  start  of  a 
CCDTAPE  run.  CCDTAPE  is  usually  run  in  a  mode  that  allows  it  to  process  an 
entire  physical  reel  of  tape  with  one  execution.  In  the  following 
descriptions,  the  terms  "tape  file”  and  "run”  are  synonymous. 

The  initialization  phase  fetches  the  value  of  three  parameters:  where  to 
begin  processing  on  tape,  how  many  tape  files  to  process,  and  the  filename 
skeleton  to  be  used.  In  generating  output  filenames,  the  skeleton,  which  is 
limited  to  seven  characters,  is  used  as  a  prefix  to  the  current  tape  file 
number.  For  example,  PLEIADS08,  PLEIADS09,  and  PLEIADS10  are  legitimate  disk 
file  names.  To  produce  this  result,  the  user  could  have  directed  CCDTAPE  to 
start  processing  at  tape  file  8,  process  three  tape  files,  and  specify  a 


skeleton  of  "PLEIADS 


The  next  phase  handles  not  only  the  physical  reading  of  tape  records,  but 
also  any  end  of  run  or  error  handling  required.  Since  a  record  may  contain 
several  frames  of  data,  a  subroutine  which  processes  a  frame  Is  called 
repeatedly,  and  It  examines  a  different  portion  of  the  tape  record  each  time 
it  is  called.  When  the  data  in  that  record  is  exhausted,  another  physical 
tape  record  is  read  and  the  process  continues  through  the  end  of  the  run, 
which  is  detected  by  an  end  of  file  on  tape.  At  the  end  of  a  run,  all  the 
needed  triples  (e,t,C)  have  been  generated;  they  exist  as  pairs  (e,t)  for  each 
column  and  reside  in  several  distinct  files  that  are  referenced  by  C;  e.g. , 
"COL25",  "COL26".  All  of  these  files  are  now  concatenated  to  form  a  single 
entity  with  which  CCDRED  can  deal,  and  all  the  scratch  files  are  deleted. 

Timing  information  is  also  hadled  by  CCDTAPE.  There  are  currently  three 
distinct  clocks,  each  with  a  specific  purpose.  Here,  the  word  ‘’clock"  is  used 
in  a  software  sense.  That  is,  “dock  X”  represents  the  time,  usually  in 
microseconds,  of  the  occurrence  of  event  X.  The  Datametrics  clock  is  used  as 
the  time  standard  and  generates  two  external  signals,  one  at  1Hz  for  counting 
seconds  and  one  at  1MHz  for  driving  the  Event  Timer  board. 

The  software  clock  (SC)  is  in  units  of  seconds  and  is  incremented  once 
each  second  by  the  1Hz  signal.  It  is  initialized  at  the  start  of  a  run  to  the 
local  time,  so  SC  always  represents  the  number  of  seconds  since  midnight. 

The  one  second  tick  clock  (OST)  is  in  microseconds.  It  represents  the 
time  at  which  SC  was  incremented.  In  this  manner  it  provides  a  link  between 
Universal  Time  and  the  times  used  on  the  Event  Timer  board. 

The  photo-gate  tick  clock  (PGT)  is  also  in  microseconds.  It  represents 
the  time  of  the  photo-gate  pulse.  This  pulse  is  sent  whenever  a  new  field  is 
read  from  the  CCD.  Since  there  are  two  fields  which  are  read  out  at  different 
times,  only  one  of  the  PGT  times  is  written  on  tape  and  it  is  adopted  as  the 
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"frame  time". 

Each  of  these  clocks  is  recorded  as  a  32  bit  entity.  Also,  since  OST  and 
PGT  derive  their  values  from  the  Event  Timer  board,  which  has  only  a  28  bit 
counter,  the  counter  (  and  thus  the  time)  reset  to  zero  approximately  every  4 
minutes.  To  provide  steadily  increasing  time,  CCDTAPE  adds  2**28  to  the  clock 
value  whenever  it  decreases  (rolls  over)  with  respect  to  its  previous  value. 

The  first  step  in  processing  a  frame  of  data  is  to  interleave  the 
frame.  When  the  data  was  recorded,  it  was  read  out  of  the  CCD  and  written  on 
tape  as  two  separate  arrays,  called  fields,  one  of  which  represents  all  the 
even  numbered  rows  and  the  other  the  odd  numbered  rows.  These  two  fields  are 
merged  so  that  the  row  numbering  and  orientation  are  the  same  in  the  working 
array  as  they  appear  on  the  monitor  at  the  observing  site.  The  frame  is  also 
checked  that  it  is  self-consistent;  i.e. ,  correct  number  of  words  and  patch 
corners  within  limits  of  screen. 

The  pixels  in  the  frame  are  now  summed  by  column,  producing  a  single 
number  associated  with  each  column  (C)  for  this  particular  frame  time  t.  The 
sums  are  adjusted  to  take  into  account  the  vertical  movement  of  the  patch  onto 
or  off  of  a  "bright  spot",  then  an  adjusted  mean  (e)  is  computed  by  dividing 
the  adjusted  sum  by  the  number  of  rows.  A  bright  spot  is  a  CCD  element  which 
is  defective  and  always  reads  out  as  the  highest  possible  value.  Without  this 
adjustment,  vertical  motion  of  the  patch  onto  a  bright  spot  would  have  the 
effect  of  greatly  increasing  the  energy  in  that  column  and  distorting  the 
star's  profile. 

The  adjusted  means  can  now  be  written  as  pairs  (e,C)  for  frame  time  t. 

The  values  of  "e"  and  "t"  are  written  to  a  scratch  file  which  is  uniquely 
determined  by  "C".  This  has  the  effect  of  generating  the  (e,t,C)  triples, 
which  were  originally  sorted  by  "t”,  to  triples  sorted  by  "C". 


III.  ANALYSIS  OF  STELLAR  COLUMN  CROSSING  PROFILES 


This  section  gives  a  more  detailed  description  of  the  program  CCDRED, 
introduced  in  section  I.B.3.  above. 

A.  Input  Parameters 

A  variety  of  input  parameters  and  options  are  available.  A  few  must  be 
set  specifically  for  each  star.  Some  will  normally  be  used  at  their  default 
value,  and  several  are  Inactive  or  useful  only  for  special  diagnostic  or  test 
purposes.  The  options  are  listed  and  explained  below,  in  roughly  in  the  order 
given  above. 

1.  Options  to  be  set  on  each  run 
a.  Discriminator  (D) 

The  discriminator  value  is  used  to  test  for  the  presence  of 
a  profile.  The  background  is  removed  approximately  and  the  data 
is  searched  for  any  point  exceeding  the  value  of  D.  D  should  be 
set  to  about  one-half  the  average  profile  height  expected.  If  it 
is  set  too  low  for  faint  stars,  the  program  can  mistake 
background  variations  for  profiles.  In  the  present  Instrumental 
configuration,  the  following  guide  can  be  used: 

CCD  Magnitude:  <2  2.5  3  3.5  4  4.5  5 

D:  50  30  20  15  12  8  6 

CCD  Magnitude  can  be  estimated  from  the  following  corrections  as 
a  function  of  spectral  type:  B:  +3/4mag;  A:  +l/2mag;  F:  +l/4mag; 
G:  0;  K:  -l/4mag;  M:  -l/2mag. 

Both  of  these  tables  may  need  refinement  in  the  future,  or 
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significant  change  if  major  instrumental  changes  are  made. 

Although  the  discriminator  setting  could  in  principle  be 
automated  by  surveying  the  data  on  a  file  before  detailed 
analysis,  it  is  more  practical  to  give  this  parameter  in 
advance.  On  the  VAX,  an  iterative  loop  resets  D,  if  needed,  to  a 
value  consistent  with  the  profile  heights  found  and  repeats  the 
profile  search.  The  star  number  is  recorded  on  tape  at  the 
observation  site.  With  computer  access  to  a  star  catalog,  D  can 
be  set  by  the  computer. 

b.  Width  of  profile  (W) 

The  approximate  width  of  a  star  profile  rise  time  or  fall 
time  in  terms  of  number  of  frames  is  needed.  This  value,  used  in 
the  profile  search  algorithm,  varies  greatly  because  the  drift 
rate  of  a  star  is  proportional  to  secant  declination.  The  rise 
time  is  about  10  frames  at  the  equator.  The  desired  value  of  W 
is  10  sec  6. 

Although  the  drift  rate  and  thus  declination  could  be 
determined  by  a  preliminary  reading  of  the  entire  file, 
practicality  favors  giving  this  parameter  in  advance.  With 
access  to  a  star  catalog  keyed  by  star  number,  the  value  of  W  can 
be  set  by  the  computer. 

c.  Reverse  (R) 

Because  of  the  presence  of  "ghosts"  in  the  profiles,  the 
direction  of  search  for  the  presence  of  a  profile  and  its 
approximate  location,  must  be  done  from  the  "ghost  free"  side  of 
the  profile.  The  "ghost”  is  described  later  in  Section  III.  The 
ghost  appears  to  lead  in  time  or  follow  in  time  depending  on  the 
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orientation  of  the  diode  array.  In  the  present  observing 
practice,  the  ghost  leads  on  the  "IN"  half  of  the  longitude  pair 
and  trails  on  the  "OUT”.  Thus,  the  R  option  Is  used  on  the  "IN" 
passage,  causing  the  profile  search  and  location  to  be  done  in 
the  reverse  direction  of  time. 

2.  Little  used  or  diagnostic  options 

Many  options  are  included  in  the  program  which  need  not  be  used 
for  production  runs.  Most  options  were  added  in  order  to  do 
diagnostics  or  corrections  for  various  instrumental  problems  which 
appeared  throughout  the  long  development  of  thjp  electronic  observing 
equipment . 

a.  Glitch  height  (H) 

This  option  calls  an  algorithm  which  searches  for  wild 
points,  or  "glitches”,  in  the  data.  Default  is  to  skip  the 
glitch  search.  Earlier  on  in  the  development  of  the  equipment, 
wild  points  appeared  both  in  and  out  of  the  profile,  which 
confused  the  profile  search  and  fitting  process.  The  glitch 
algorithm  searches  for  points  which  disagree  with  their  neighbors 
by  more  than  "H"  energy  units.  Obviously,  "H"  should  be  set  to  a 
value  greater  than  the  noise  of  the  data.  A  message  is  printed 
when  a  glitch  is  found.  Too  many  messages  may  mean  H  has  been  set 
too  small. 

b.  Smoothing  window  (S) 

A  default  value  is  used  which  is  appropriate  to  the  present 
properties  of  the  data.  A  strongly  smoothed  copy  of  the  profile 
in  a  column  is  formed  in  array  "B"  for  searching  for  a  profile 
and  locating  its  center  and  edges  approximately  for  fitting 
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ranges.  Another  smoothing  parameter  can  smooth  the  raw  data  for 
reducing  noise  in  the  profile  before  least  squares  fitting  of  a 
polynomial  to  the  data.  The  number  given  for  S  is  the  number  of 
frames  in  the  window  to  be  convolved. 

c.  Diagnostics  (DIAG) 

The  presence  of  this  option  causes  a  variety  of  intermediate 
results  to  be  printed  out,  with  labels  for  locating  sources  of 
trouble. 

d.  First  column  to  process  (F) 

This  causes  the  program  to  skip  the  first  F  columns. 

e.  Number  of  columns  to  process  (N) 

Combined  with  F,  a  predetermined  group  can  be  selected. 

f.  Minimum  points  (M) 

Causes  program  to  Ignore  columns  with  less  than  M  points. 

g.  Inversion  (I) 

This  option  is  a  remnant  of  a  period  when  the  energies  from 
the  diode  array  were  recorded  in  the  sense  of  increasing  number 
for  decreasing  energy.  The  option  subtracts  the  recorded  numbers 
from  a  constant,  thus  changing  their  directional  sense  as  a 
function  of  brightness. 

B.  Data  Reading 

The  reading  process  is  divided  into  calls  on  a  reading  module  which 
brings  the  data  for  one  column  into  computer  memory.  The  data  has  been 
prepared  in  this  form  by  the  sorting  process  described  in  Section  II.  The 
reading  subroutine  is  called  REEDR.  The  subroutine  fills  and  passes  out  the 
following  via  a  parameter  list: 

1.  The  array  column  number  -  JCOL 
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2.  The  number  of  time-energy  point  pairs  -  NP 

3.  The  time  of  the  opening  of  the  column  in  seconds  from  midnight  - 
BASE1 

4.  The  one-dimensional  array  "T"  carrying  the  time  of  each  point  in 
seconds  counted  from  the  BASE1  as  the  zeropoint. 

5.  The  one-dimensional  array  “A"  carrying  the  total  energy  Integrated  by 
the  column  of  pixels  at  the  time  indicated  by  the  corresponding  array 
element  in  the  array  “T”. 

The  arrays  A  and  T  typically  carry  several  hundred  point  pairs 
of  information  on  the  star  passage.  Various  errors  in  reading  are 
tested  in  the  subroutine.  Appropriate  warning  messages  are  printed 
when  errors  occur. 

C.  Preliminary  Processing  of  the  Column  Data 

In  the  “main  line"  program,  called  EPOCH,  various  preliminary  operations 
can  be  done  in  the  column  processing  loop.  These  operations,  under  option 
controls,  are  mentioned  in  discussion  of  input  options.  Before  fitting  the 
profile,  the  subroutine  INVERT  can  be  called  for  reversing  the  order  of  the 
data  in  time  and/or  inverting  the  sense  of  the  energies.  The  subroutine 
GLITCH  can  be  called  for  removing  wild  points.  The  smoothing  operation  can  be 
called  with  a  narrow  window  for  reducing  the  noise  in  the  array  A  to  Improve 
fitting.  The  smoothing  operation  is  called  with  a  broad  window  to  fill  an 
auxiliary  array  B  containing  the  same  number  of  elements  as  A  but  with 
strongly  smoothed  data  for  use  by  the  profile  search  and  locating  algorithm. 

D.  The  Profile  Search  and  Locating  Algorithm 

After  a  column  of  data  has  been  prepared  as  described  in  C. ,  a  call  is 
made  in  the  mainline  on  a  module  called  STRSR  (star  search)  which  attempts  to 
determine  whether  a  star  profile  is  present  and  to  find  its  approximate 
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location  in  the  array.  This  subroutine  developed  gradually  with  much 
experience  with  faulty  data,  and  has  accumulated  many  minor  features,  but  the 
overall  operation  is  as  follows: 

The  strongly  smoothed  array,  B,  of  column  energies  is  passed  in  for 
profile  detection.  The  noise  is  greatly  reduced  by  the  smoothing  so  as  not  to 
confuse  the  search  for  the  profile  or  the  location  of  fractional  power  points 
on  the  profile.  The  value  of  the  discriminator  in  the  input  option  is  used  to 
test  for  energy  or  "height"  in  the  array,  starting  from  the  low  numbered 
element  of  the  array.  Since  the  array  is  smoothed,  the  first  several  points 
provide  an  initial  estimate  of  the  backgound.  The  array  is  assumed  to  be 
reversed  if  necessary  so  that  the  ghost,  if  any,  is  trailing  with  regard  to 
Increasing  array  element  number.  When  the  first  point  is  reached  such  that 
its  value  minus  the  background  exceeds  the  discriminator,  the  subroutine 
assumes  a  profile  is  present  and  attempts  to  locate  it. 

The  value  of  "width”  passed  in,  is  the  number  of  array  elements  expected 
on  the  side  of  the  profile.  Since  the  discriminator  represents  an  appreciable 
fraction  of  the  expected  profile  height,  the  peak  should  certainly  occur 
within  two  widths  of  the  point  where  the  discriminator  is  exceeded.  The 
subroutine  searches  for  a  maximum  point  within  this  range.  The  maximum  point 
is  assumed  to  be  near  the  center  of  the  profile.  The  subroutine  then  "backs 
up"  and  searches  for  the  15  percent  and  85  percent  points  on  the  leading  side 
of  the  profile.  From  the  top  of  the  profile  the  85  percent  point  on  the 
trailing  side  is  located.  The  height  of  a  point  one  width  from  the  85  percent 
point  is  found.  From  the  85  percent  point,  a  range  of  three  widths  is  set  for 
searching  for  a  minimum.  If  a  normal  ghost  is  present,  the  bottom  of  the 
valley  between  the  profile  and  ghost  is  located.  If  the  star  is  very  bright 
the  valley  may  be  filled  in  and  the  end  of  the  range  is  likely  the  minimum 


point.  Initial  profile  ranges  are  then  set.  The  left  end  is  the  15  percent 
point  minus  1.6x  width. 

All  points  outside  of  the  total  profile  range  Including  the  ghost  are 
then  used  to  compute  a  background  value.  This  value  is  subtracted  from  all 
points  in  the  array.  The  profile  search  process  is  repeated,  and  the 
background  computed  a  second  time.  The  total  background  found  is  subtracted 
from  array  A  which  contains  the  data  which  will  be  used  for  fitting  the 
profile.  The  outputs  of  the  profile  search  algorithm  are  the  array  elements 
which  determine  the  fitting  range  on  the  profile.  In  Figure  3,  the  range  for 
fitting  the  rise  of  the  profile  will  be  from  points  lying  between  a  and  f. 


Features  of  the  Column-Crossing  Profile 
The  falling  side  will  be  fit  from  points  lying  between  e  and  j.  For  an 
equatorial  star,  about  10  points  lie  between  b  and  d,  and  more  if  the  star  has 
higher  declination,  increasing  in  number  as  secant  6. 

Array  ISYMT  (1-6)  passes  out  the  element  number  of  a,  c,  f,  e,  h,  and  j, 
in  that  order. 

E.  Profile  Fitting 


1.  Polynomial  Fit 

The  two  profile  sides  are  fit  separately  by  two  calls  on  the 


77 


71 


* 


i 


O' 


R 


same  subroutine  called  FITAM.  The  left  point,  raid-height  point,  and 
right  point  of  the  fitting  range  are  passed  into  the  subroutine.  The 
subroutine  fits  this  range  of  the  profile  with  a  function  of  time. 

,  I 

The  times  for  each  point  in  the  profile  are  'passed  in  as  a  one 
dimensional  array  T  with  a  one-to-one  correspondence  to  the  elements 
of  array  A  which  carries  the  energies,  or  star  profile. 

For  the  least  squares  fit  to  the  half  profile,  a  zero  point  In 
time  is  removed.  The  time  corresponding  to  point  c  in  Fig.  3  is 
subtracted  so  that  the  least  squares  solution  Is  more  nearly  balanced 
In  time.  A  least  squares  solution  then  gives  the  energies  of  the 
profile  as  E(t)  *  !  a^  t  ,  a  polynomial  representation  where  the  a^ 
are  constants  found  by  a  least  squares  solution  and  the  e^  are 
fractional  exponents.  The  left  side  of  a  profile  shown  in  Fig.  4, 
illustrates  many  features  of  the  fitting  process. 


FIGURE  4 

Detail  of  Fit  to  One  Side  of  a  Profile 

The  function  E  is  evaluted  at  points  a  and  f.  The  difference  of 
Ef  -  Ea  Is  the  height  of  the  profile  as  estimated  by  the  polynomial 


fit.  The  desired  time  Is  the  half  power  height  of  the  profile.  This 

would  be  the  point  where  V2  the  star  image  is  on  the  pixel  column  if 

the  star  diameter  is  less  than  the  pixel  width.  A  good  Initial 

estimate  of  this  is  point  c  which  was  passed  into  the  fit  routine.  A 

subroutine,  XOFY,  which  Inverts  a  function  by  Newton's  method,  is 

called  to  take  Ejg  ■  (Ej  -  Ea^/2  find  the  value  of  tj,  in  the 

polynomial  to  yield  E(ta)  »  Em>  Similarly,  the  values  of  t  are  found 

for  E  ■  0.11  of  full  height  and  E  -  0.89  of  full  height.  These 

values  of  t,  would  correspond  to  points  at  ±lcr  from  the  center  of 
xC 

the  star  image  if  the  star  image  were  Gaussian  in  its  brightness 
distribution.  The  difference  of  these  two  are  a  good  measure  of  star 
diameter  in  time. 

The  polynomial  for  fitting  the  profile  curve  works  best  if  it  is 
zeroed  near  the  half  height  of  the  profile.  As  an  additional 
precaution,  the  zero  point  in  time  is  taken  as  tm  found  above  which 
should  be  better  and  could  be  significantly  different  from  the  tc 
originally  used. 

The  above  process  is  used  again  to  fit  E(t)  and  find  Ef,  Ea, 

t_  t .  and  t  . 
m  +0  -o 

The  right  side  of  the  profile  is  treated  by  the  same  subroutine 
with  a  different  fitting  range  passed  in. 

Output  from  the  subroutine  is  the  time  at  half  height,  the 
time  tQ_  before  half  height  and  the  time  tQ+  after  half  height.  The 
height  of  the  profile  as  determined  by  E(trlght  end)  -  E(tleft  end) 
is  passed  out.  This  changes  sign  from  positive  on  the  left  side  to 
negative  on  the  right,  which  is  a  useful  diagnostic  in  the  printout. 


The  polynomial  used  to  fit  the  half  profiles  was  developed  by 


experimentation.  Assuming  the  star  point  spread  functions  are 
Gaussian  and  smaller  than  a  pixel,  the  profile  sides  are  the  integral 
of 

,  -t2  , 
exp  (  — -z  ) 

2a 

Tabulated  values  of  this  Integral  were  fit  with  various  terms 
including  trigonometric  functions.  The  most  successful  function  was 
E(  t)  ■  aj  +  a2t  +  a^t®*®  +  a^t®’^  +  ajt®*^,  with  t  ■  0  at  the  half 
height  and  where  the  sign  of  te  is  applied  after  the  fractional 
exponent  is  evaluated  for  t  positive.  The  zero  point  of  t  should  be 
near  the  half  height  of  the  profile  for  the  best  fit. 

The  least  squares  routine  is  designed  for  a  minimum  of  code  in 
the  routine  which  makes  the  call  for  a  least  squares  solution.  An 
array  called  EQ  is  loaded  with  the  individual  equations  of 
observation.  For  the  equation  above,  they  are 

EQ  (n,  1  2  3  4  5  6) 


The  call  must  give  the  number  of  equations  and  the  number  of 
unknowns:  DALSQ  (n,5). 

The  values  of  the  a^  in  the  polynomial  are  returned  in  an  array 
called  CN. 

Other  very  different  and  better  methods  of  extracting  the  timing 
Information  from  the  profiles  are  treated  in  Section  V.  The 
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treatment  of  the  two  sides  of  the  profile  corresponds  to  the  manual 

operation  of  the  T-4  with  contact  closing  and  contact  opening  times. 

F.  Array  Storage  of  the  Column  Data 

When  the  time  of  immersion  and  emersion  and  other  parameters  of  each 
column  profile  are  determined,  they  are  stored  in  scratch  files  (or  arrays  in 
VAX)  in  the  main  line  of  the  program. 

The  identifiers  are  as  follows: 

SEQCOL  -  sequential  count  of  acceptable  columns. 

INPCOL  -  the  column  number  on  the  array. 

CLOCK  -  the  value  of  the  count  of  seconds  since  midnight  for  the 
opening  of  the  column  (Basetime). 

ISYMT  -  six  frame  numbers  corresponding  to  points  a,  c,  f,  e,  h,  and 
1,  in  Fig.  3.  (These  values  are  not  being  used  later  and 
this  storage  could  be  eliminated.) 

SIGMA  -  four  values  of  the  time  differences  of  b  and  d  from  c  of 
Fig.  3,  and  the  similar  pair  on  the  right  side  of  the 
profile. 

ENR  -  the  two  values  of  profile  height,  from  the  left  and  right 
side  of  the  profile. 

TIM  -  the  two  values  of  time  of  immersion  and  emersion  as  defined 
in  III.  E.  These  times  are  times  in  seconds  elapsed  beyond 
the  value  of  CLOCK  and  thus  have  a  value  of  a  few  seconds. 

G.  Testing,  Diagnostic  Printout  and  File  Storage  of  Column  Crossing  Times 

The  final  module  in  the  processing  of  a  single  set  of  column  crossings  is 
a  subroutine  called  TIMFN,  which  reads  back  the  data  stored  in  III.  F. , 
performs  an  analysis,  prints  out  some  results  and  writes  a  storage  file.  The 
storage  file  name  is  the  name  of  the  input  data  file  with  an  .SM  (summary) 
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extension. 

First  the  profile  time  widths  (SIGMA  of  III.  F.)  are  read  into  an 
array.  The  mean  and  r.m.s.  of  these  four  sets  of  values  are  computed  by  a 
call  on  RMS  and  printed  out.  The  values  are  written  out  to  the  summary 
file.  The  values  of  profile  heights  are  handled  similarly. 

The  values  of  array  column  number  INPCOL  are  read  into  the  array  COLMN 
and  written  to  the  summary  file. 

The  values  of  CLOCK  are  read  in,  subtracted  from  the  value  of  CLOCK  for 
the  first  column,  added  to  the  times  of  Immersion  and  emersion  and  stored  in 
the  two  dimensional  array  TIM.  These  times  are  thus  in  units  of  seconds  from 
the  integer  second  of  opening  of  the  first  column.  They  are  written  to  the 
summary  file. 

A  subroutine  called  TIMFT  is  called  to  perform  a  linear  least  squares  fit 
on  the  column  crossing  times.  A  column  number  near  the  middle  of  the  column 
range  is  subtracted  before  the  fit  is  made  and  this  "zero  point  column"  number 
is  printed  out.  The  equation  fitted  is  T  ■  a  +  bx(col.#  -  mid-col.  #).  The 
constant  a  is  then  the  time  at  the  zero  point  column  number  and  b  is  the  rate 
in  seconds  per  column  at  which  the  star  moves. 

Throughout  the  development  of  the  T-4  recording  system  a  great  variety  of 
problems  have  appeared  which  caused  some  profiles  to  be  defective.  In  order 
to  avoid  destroying  the  quality  of  an  array  transit  due  to  only  a  few  bad 
profiles,  an  iterative  feature  has  been  included  in  the  fitting  procedure. 
After  a  fit  to  the  crossing  times  has  been  made  and  the  standard  error  of  a 
column  has  been  determined,  the  residual  of  each  column  is  compared  to  two 
(CUTOFF)  standard  errors.  For  any  column  exceeding  this  limit,  a  zero  is 
entered  into  an  array  WEIGHT.  A  new  solution  is  made  eliminating  the  bad 
columns  and  residuals  are  again  tested.  If  fewer  than  10%  of  the  columns 


exceed  the  limit,  the  loop  is  exited.  Residuals  of  bad  columns  are  also 
computed  from  the  current  fit.  Revision  of  the  value  of  "CUTOFF"  may  be 
adviseable  in  the  future  after  study  of  the  behavior  of  the  residuals.  The 
values  of  _a ,  J>  (CN(1),  CN(2))  errors  of  a,  b  (SE(1),  SE(2)),  standard  error 
of  a  column  (SEl),  and  the  weight  array  of  0's  and  l's  are  passed  out  of 
subroutine  TIMFT  and  written  to  the  storage  file.  The  fit  routine  is  called 
separately  for  the  times  of  immersion  and  the  times  of  emersion.  All 
residuals  of  both  immersion  and  emersion  times  and  their  weights  are  printed 
out  for  examination  of  the  quality  of  the  data. 

The  storage  file  carries  various  parameters  in  record  0.  The  first  nine 
elements  are  presently  unused.  The  remaining  elements  are  as  follows: 


ELEMENT  # 
10 
11 
12 

13 

14 

15 

16 

17 

18 


PARAMETER 

Thousands  of  seconds  of  first  column  basetime 

Remainder  of  first  column  basetime 

Number  of  columns 

Zero  point  column 

a 

b 

Error  of  a 
Error  of  b 

Standard  error  of  a  column 


Elements  13  -  18  are  for  immersion.  Elements  19  -  24  repeat  the  same 
parameters  for  the  emersion.  Records  1-11  carry  information  for  each  column 
in  their  elements.  The  identifiers  shown  below  are  those  used  in  III.  F. 
Records  1-4  four  values  of  SIGMA,  the  time  widths  of  profiles 

5  - 


6  two  values  of  ENR,  the  heights 
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7  -  8  two  values  of  time  T  (1,  n)  T  (2,  n) 

9  Diode  Array  column  numbers  COLUMN 
10-11  the  1 *8  and  0's  for  good  or  bad  column 
On  the  VAX  version,  this  file  information  is  kept  in  arrays  and  the 
program  described  in  IV  is  part  of  one  large  program. 


IV.  TIME  OF  MERIDIAN  DETERMINATION 


The  observational  technique  being  used  for  time  of  meridian  determination 
with  the  T-4  and  diode  array  is  to  reverse  the  entire  T-4  instrument  by  180° 
in  azimuth  near  meridian  passage.  With  appropriate  level  corrections,  the 
time  of  a  star  crossing  of  a  given  column  before  and  after  reversal  is  equally 
spaced  in  time  from  star  transit  of  the  intrument  meridian  as  indicated  in 
Fig.  5. 


FIGURE  5 


Geometry  of  Diode  Array  Reversals  about  the  Meridian 
The  mean  of  the  two  crossing  times  of  a  column  on  IN  and  OUT  thus  gives  a 
time  of  instrument  meridian  transit.  Means  of  all  columns  with  both  an  IN 
time  and  OUT  time  recorded  give  many  values  for  the  time  of  meridian  which 
together  form  a  more  accurate  mean  time  of  instrument  meridian  passage.  The 
star  is  not  recorded  for  all  columns  because  it  mist  be  visually  located  and 


covered  with  the  cursor  field  before  data  can  be  recorded. 

A  time  of  meridian  passage  could  be  calculated  from  the  constants  of  the 
linear  fits  to  crossing  time  by  extrapolating  the  linear  fit  to  a  fictitious 
column  number  at  the  meridian  where  both  IN  and  OUT  functions  yield  the  same 
crossing  time.  However,  the  means  of  the  same  column  on  IN  and  OUT  give  more 
insight  into  the  behavior  of  the  columns  and  avoid  the  weakness  in 
extrapolation. 

The  program  which  takes  the  means  of  the  column  pairs  is  called  SMREVP. 
This  program  reads  the  pair  of  .SM  files  which  carry  the  timing  information  on 
the  IN  and  OUT  passages.  A  subroutine  has  been  written  which  can  compute  the 
time  of  meridian  by  the  extrapolation  method  described  above.  The  major  part 
of  the  program  is  concerned  with  forming  various  combinations  of  pairs  and 
printing  them  out. 

In  practice,  the  "times  of  column  crossing”  involve  both  immersion  and 
emersion  and  the  symmetry  of  these  in  reversal  must  be  considered.  As  shown 
in  Fig.  6  the  emersion  side  of  the  column  on  the  IN  passage  is  equidistant 
from  the  meridian  with  immersion  on  the  OUT  passage.  Similarly,  IN-immersion 


Geometry  of  Equal  Pairs  of  "Immersion"  and  "Emersion"  in  Reversal 
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If  the  orientation  of  the  ghost  profile  is  considered,  one  of  the  above 
combinations  has  the  "ghost-free"  profile  edges.  The  orientation  used  thus 
far  is  8hotm  in  Fig.  6,  and  thus  the  IN-emersion,  OUT-immersion  is  the 
preferred  combination,  although  experience  has  shown  that  the  ghost-side  can 
also  yield  the  same  precision  if  there  is  a  minimum  in  the  profile  between 
ghost  and  main  profile.  (A  centering  method  which  finds  one  value  for  the 
center  of  the  profile  only,  such  as  the  double  Gaussian  fit  described  in  V. 
does  not,  of  course,  have  the  problem  of  pairing  immersions  and  emersions.) 

Other  combinations  of  Immersion  and  emersion  would  seem  possible  with  a 
strip  width  correction.  However,  it  has  been  found  that  in  the  present 
Instrumental  arrangement,  the  effective  star  diameter  is  comparable  to  the 
diode  column  width  and  thus  the  difference  of  immersion  and  emersion  times  is 
not  constant,  but  a  function  of  focal  adjustment  and  other  variables. 

The  program  which  determines  the  time  of  meridian  forms  a  two-dimensional 
array  P  (100,  11)  for  printing  a  table  of  timing  combinations  of  IN,  OUT, 
Immersion,  emersion  for  each  good  column  pair.  The  array  IP  carries  the  0's 
and  l*s  indicating  which  are  the  good  and  bad  columns.  A  mean  of  all  pair 
combinations  is  computed  and  one  or  more  combinations  can  be  taken  as  the  time 
of  instrument  meridian  passage.  The  standard  error  of  a  pair  is  computed  and 
the  error  of  the  mean  of  all  pairs  is  computed  and  printed  out  for  each  pair 
combination.  If  the  error  of  ghost-side  mean  is  low,  it  can  be  averaged  with 
the  ghost-free  value.  An  example  of  the  results  appears  in  VI.  Formal 
Internal  errors  of  the  transit  time  often  are  as  low  as  a  few  milliseconds. 
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V.  ALTERNATE  FITTING  METHODS 

A.  Double  Gaussian  Fit 

The  major  alternative  to  the  separate  profile  side  fitting  described  In 
III  Is  a  fitting  algorithm  which  fits  the  entire  profile  and  ghost  In  one 
operation  with  a  single  function.  The  profiles  are  not  necessarily  Gaussian 
In  shape,  but  due  to  the  star  Image  diameter  being  comparable  to  the  diode 
column  width,  the  profiles  do  not  have  a  flat  top,  but  have  qualitatively  the 
same  properties  of  a  Gaussian  or  bell-shaped  curve.  The  instrumental  effects 
which  cause  the  ghost  are  expected  to  generate  the  same  shape  as  the  main 
profile  but  smaller  In  vertical  scale. 

A  subroutine  has  been  developed  to  model  the  profile  as  the  sum  of  two 
Gaussian  functions  and  a  zero-point  constant,  as  shown  In  Fig.  7. 


Gaussian  Representation  of  the  Profile 
In  mathematical  terms,  the  profile  height  is 

-<t  -  t  )2  -(t  -  t.) 

H(t)  *  C  +  A  exp  {  - r —  )  +  f  A  exp  (  - 5 —  )  . 

2  a  2o 

To  reduce  the  number  of  unknowns,  ( t j  -  tp)  is  assumed  to  be  the 
equatorial  column  crossing  rate  divided  by  cosine  declination,  or 


tj  ■  tg  +  0.95  sec  6 


The  width  of  the  profile,  o,  along  with  c,  f,  A,  and  tj  are  determined  from 
each  profile.  These  unknowns  are  determined  iteratively  by  taking 
differentials  with  respect  to  each  and  solving  for  corrections  to  current 
values  for  each  unknown.  Approximate  initial  values  are  required  to  start  the 
process.  Values  found  by  the  profile  search  algorithm  desclbed  in  III.  D.  can 
be  used  for  starting  the  differential  correction  iterations. 

For  a  Gaussian  function,  analytical  derivatives  to  each  unknown  can  be 
written,  which  are  faster  to  evaluate  than  numerical  derivatives  which  may  be 
required  in  more  complicated  functions.  Formally,  the  correction  to  the 
computed  height  H(tg,  A,  f,  o,  c)  of  the  profile  at  any  point  can  be  written 
as  the  total  derivative  to  the  unknowns. 


u  _  u  *  II  3H  3H 

observed  "computed  3tQ  o  9 A  3f 


A  .  3H  . 
Ao  +  —  Ac 
oC 


This  equation  can  be  evaluated  for  each  frame  time  on  the  entire  profile 
and  the  unknowns  At,  AA,  Af,  Ao,  and  Ac  can  be  found  by  a  least  squares 
solution.  These  corrections  are  added  to  the  current  values  of  t.  A,  f,  o, 
and  c.  The  differences  ^observed  -  Hcompute(j  are  again  found  from  the  new 
constant,  the  partial  derivatives  are  evaluated  with  the  new  constants  and  the 
cycle  repeated  until  some  convergence  criterion  is  satisfied. 

The  parameters  given  to  the  subroutine  for  the  Gaussian  fit,  called 
F1TGS,  are  the  same  as  those  for  FITAM  described  in  III.  E. ,  except  that 
declination  is  also  passed  in  to  determine  the  ghost  displacement  in  time. 

The  identifier  for  tg  is  TO,  A  is  AC,  c  is  B,  f  is  F,  and  a  is  S.  The  partial 
derivatives  for  each  constant  are  loaded  into  array  EQ(n,  1-5)  for  the  five 
constants. 

The  value  for  a  is  passed  out  in  all  four  elements  of  SIGMA  to  keep  the 


subroutine  compatible  with  the  remainder  of  the  program.  Similarly,  TO  is 
passed  out  in  TIM(l)  and  TIM(2);  AC  is  passed  out  in  ENR(l)  and  ENR(2). 

Since  the  Gaussian  fit  routine  uses  the  entire  profile,  with  ghost,  the 
value  of  TO  should  be  better  determined  than  the  time  of  the  mid-height  of 
each  profile  side.  Experience  with  a  number  of  nights  of  observation  has 
shown  that  the  internal  error  of  column  crossing  pairs  was  reduced  by  about  30 
percent. 

B.  Trapezoidal  Fit 

Similar  to  the  Gaussian  fit,  a  trapezoidal  function  has  been  used  in  a 
differential  correction  algorithm  for  fitting  the  profiles.  The  trapezoidal 
model  was  motivated  by  the  expectation  that  the  top  of  the  profile  would  be 
flat  if  the  star  diameter  were  small  relative  to  the  diode  column  width. 

Also,  the  ghost  was  expected  to  disappear  with  improved  electronics  in  the 
diode  array  driving  circuitry.  The  trapezoidal  fit  was  written  and  developed 
on  data  which  had  little  ghost  effect  but  without  a  flat  top. 

The  method  of  treating  the  trapezoid  was  to  take  derivatives  with  respect 
to  the  time  coordinate  of  the  points  a,  b,  c,  d,  and  height  h  shown  in  Fig.  8. 


’  I  r 


FIGURE  8 

Trapezoidal  Representation  of  the  Profile 


The  derivatives  for  the  straight  line  segments  were  evaluated  only  within 
their  respective  intervals.  Extensive  testing  was  not  carried  out  because  the 
flat  topped  profiles  have  not  yet  been  produced,  but  the  test  results  were 
comparable  to  the  other  fitting  methods  in  accuracy. 
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SOME  EXAMPLES  OF  PROGRAM  OUTPUT 


FILENAME:  T4DEC09:09tlEC408 


0.000  0.000  0.000  0.000  50.447  50.000  49.9SS  SO. 789  49.9SS  SO. 789  49.9SS 
0.000  0.000  .  0.000  0.000  104.994  104.987  104.711  107.271  104.987  104.995  104.941 
0.000  .0.000  0.000  0.000  0.023  0.018  0.021  0.024  0.021  0.024  0.021 
0.000  0.000  0.000  0.000  O.OOS  0.004  O.OOS  0.004  0.005  0.004  0.005 
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APPENDIX  III 


OPERATIONAL  SYSTEM  ON  THE  NOVA  MINICOMPUTER 
FOR  THE  CCD  EYEPIECE  SYSTEM 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9,  1982 
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D  G  CURRIE  NOV  82  AFGL-TR-82-0184  F19628-77-C-0186 

2\i 

[  UNCLASSIFIED 

F/G  17/8 

NL 

MICROCOPY  RESOLUTION  TEST  CHART 

NATIONAL  BUREAU  OF  STANDARDS- 1963-A 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9*  1982 


BLOCK!  11457(26301) 


1  <  T4  PROGRAM  COMMENTS  FCW  1/22/82  >  »S 


3  ALL  ODD  NUMBERED  BLOCKS  ARE  RESERVED  AS  COMMENT  BLOCKS.  MOST 

4  EVEN  NUMBERED  BLOCKS  ARE  PROGRAM  BLOCKS t  ALTHOUGH  IF  A  COMMENT 

5  TAKES  MORE  THAN  1  BLOCK*  IT  WILL  OVERFLOW  TO  THE  NEXT  EVEN 

6  NUMBERED  BLOCK.  ALL  COMMENT  BLOCKS  CAN  BE  LOADED  WITH  NO 

7  DIFFICULTY. 

10 

11 


12 

13 

14 


15 


16 

17 

20 


BLOCK!  11458(26302) 

1  (  T4  LOAD  BLOCK  FCW  1/8/82  MOD  4-22-82  ) 

2 

3  :  T4  i 
A 

5  TAPE  *  TAPE  LOADED*  CR 

6 

7  DBL-PREC  *  DOUBLE  PRECISION  LOADED*  CR 
10 

11  :  T4-L0AD  375  304  DO  I  LOAD  2  +L.OOP  ? 

12 

13  T4-L0AD  *  T4  SYSTEM  LOADED*  CR 

14 

15  DECIMAL  *  BASE  IS  DECIMAL*  CR  BELL 

16 
17 

20  fS 


BLOCK:  11459(26303) 


1  (  LOAD  BLOCK  COMMENTS  FCW  1/22/82  )  ? S 

2 

3  T4  -  DUMMY  DEFINITION  TO  PREVENT  THE  T4  SYSTEM  FROM  BEING 

4  LOADED  TWICE. 

5 

6  TAPE  -  LOAD  THE  TAPE  READ/WRITE  ROUTINES 

7 

10  DBL-PREC  -  LOAD  THE  DOUBLE  PRECISION  INTEGER  ROUTINES 

11 

12  T4-L0AD  -  LOAD  THE  REST  OF  THE  T4  PROGRAM  BLOCKS 

13 

14 

15 

16 
17 
20 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9»  1982 


BLOCK:  11 487 <26337) 

1  <  INTERRUPT  HANDLER  COMMENTS  FCW  1/21/82  >  IS 

2 

3  ON  THE  T4  PROGRAM,  INTERRUPTS  ARE  USED  ONLY  TO  SERVICE  THE  KEY 

4  BOARD.  ANY  OTHER  INTERRUPTING  DEVICE  WILL  CAUSE  THE  PROGRAM 

5  TO  ABORT. 

6  * IVECT *  IS  AN  INTERRUPT  VECTOR  ARRAY  64  WORDS  LONG.  THE  VECTOR 

7  OFFSET  IS  DETERMINED  BY  THE  ASCII  VALUE  OF  THE  KEY  STRUCK.  THIS 

10  ARRAY  IS  INITIALIZED  SO  ALL  VECTORS  POINT  TO  THE  INTERRUPT  EXIT 

11  ROUTINE. 

12 

13 

14 

15 

16 
17 
20 


*LOCK:  11488(26340) 

1  <  T4  INTERRUPT  EXIT  FCW  1/8/82  MOD  4-- 1.3-62  > 

2 

3  CODE  INT-EXIT 

4  REGS  4+0  LDA»  0  0  MOV,  *2  REGS  3+3  LDA, 

5  REGS  2+2  LDA,  REGS  1+  1  LDA,  REGS  0  LDA, 

6  INTENf  0  I)  JMP, 

7 

.0  '  INT-EXIT  CONSTANT  IXIT 

.1 

2  <  INITIALIZE  INTERRUPT  VECTOR  TABLE  ) 

.3  IXIT  IVECT  »  IVECT  DUP  1+  176  WORDS 
.4 

5 

6 
7 

fO  »S 


(LOCK!  11489(26341) 

1  <  INTERRUPT  EXIT  COMMENTS  FCW  1/21/82  )  IS 

2 

3  RESTORE  REGISTERS  AND  CY 

4  ENABLE  INTERRUPTS 

5  RETURN  TO  INTERRUPTED  PROGRAM 

6 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9,  1982 


BLOCK!  11490(26342) 

1  <  KEYBOARD  INTERRUPT  SERVICE  ROUTINES  FCW  1/8/82  ) 

2  <  MOD  5/13/82  > 

3 

4  t  IVCT!  HERE  SWAP  IVECT  +  !  f 

5  CPATCH  INTEGER  IMV  0  INTEGER  WELL 

6 


7 

(  LEFT  )  061 

I VCT ! 

IMV 

2  LDA, 

2 

2) 

DSZ , 

IXIT 

JMP, 

10 

2 

2) 

ISZ, 

ixir 

JMP , 

11 

(  RIGHT  )  063 

IVCT ! 

IMV 

2  LDA, 

2 

2) 

ISZ, 

IXIT 

JMP, 

12 

(  UP  )  065 

I  VCT ! 

IMV 

2  LDA, 

0 

2) 

ISZ, 

IXIT 

JMP, 

13 

(  DOWN  )  054 

IVCT! 

IMV 

2  LDA, 

0 

2) 

DSZ, 

IXIT 

JMP, 

14 

0  2) 

ISZ, 

IXIT 

JMP. 

15 

(  FINISHED  ! 

)  15 

IVCT! 

2  2  LDA, 

WELL  2 

STA, 

16 

IXIT  JMP, 

17 

20 

fS 

BLOCK!  11491(26343) 

1  <  INTRR,  SERVICE  COMMENTS  FCW  1/21/82  )  )S 

2 

3  THESE  ROUTINES  INCREMENT  OR  DECREMENT  THE  STARTING  ROW  OR 

4  COLUMN  *  TO  CHANGE  THE  PATCH  POSITION. 

5  A  'CR'  SETS  •WELL*  TO  A  NONZERO  VALUE  TO  TERMINATE  DATA 

6  TAKING, 

7 

10 

11 

12 

13 

14 

15 

16 
17 
20 


BLOCK:  11492(26344) 

I  1  (  INTERRUPT  CONTROL  ROUTINES  FCW  1/8/82  MOD  1/11/82  ) 

I  2 

;  3  1  » CODE  KCKA  '  INTERRUPT  , 

i  4  0  S)  0  LDA>  77  DOB,  '  KCKA  0  LDA.  1  0  STA,  POP  JMP, 

5 

6  CODE  STTI  110  NIO,  NEXT  JMP,  CODE  CTTI  210  NIO,  NEXT  JMP, 

7 


10 

:  KCLR 

177777 

KCKA  CTTI  1 

11 

!  KARM 

177775 

KCKA  STTI  1 

12 

13 

CODE  DI 

277  NIO,  NEXT  JMP, 

14 

CODE  El 

INTEN, 

NEXT  JMP, 

15 

16 

:  CINIT 

CRATE 

SCA  4  WORDS  KARM 

17 

:  CFIN 

KCLR 

1 

20 

IS 

T4  SYSTEM  PROGRAM  AS  OF  JULY  9r  1982 


SLOCK!  11493(26345) 

1  (  INTERRUPT  CONTROL  COMMENTS  FCW  1/21/82  >  IS 

!  2 

i  3  KCKA  -  OUTPUTS  THE  INTERRUPT  MASK  ON  THE  STACK  AND  SETS  THE 

4  INTERRUPT  VECTOR  <  LOC  1  )  TO  POINT  TO  THE  T4  INTER- 

5  RUPT  HANDLER. 

6 

7  CINIT  -  SETS  UP  THE  SCRATCH  AREA  FOR  THE  RATE  AND  ENABLES  THE 

10  TTI  INTERRUPT  MASK. 

11 
12 

13 

14 


15 

16 
17 
20 


BLOCK:  11494(26346) 

1  (  STAR  •  AND  OTHER  STUFF  FCW  1/21/82  MOD  4/15/82  > 

2 

3  -1  INTEGER  STAR-NMBR 

4  :  STAR-NUMBER 

5  BASE  9  DECIMAL  WORD  NUMBER  DROP  STAR-NMBR  » 

6  BASE  I  I 

7 

10  :  SN  STAR-NUMBER  I 

11 

12  0  INTEGER  LOC  5  DP  + !  (  ASCII  STRING  ) 

13  :  LOCATION 

14  WORD  DP  9  1+  LOC  5  WORDS  I 

1 5 

16 
17 

20  IS 


BLOCK:  11495(26347) 


1  (  HEADER  AND  HEADER  ROUTINES  COMMENTS  FCW  1/22/82  ) 

2 


3 

4 

5 

6 

7 

10 

11 

12 

13 


the  record  header  format  is  as  follows. 

•  DESCRIPTION 


0 

1 

2-3 
4-17 
18  -  25 


STAR  NUMBER 
SPARE 

DMA  1  SEC  CLOCK 

ETBUF  (  LESS  PHOTOGATE  ) 

SPARES 


IS 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9»  1982 


BLOCK?  11496(26350) 

1  <  T4  SYSTEM  )  IS 

2 

3 

4 

5 

6 
7 

10 

11 

12 

13 

14 

15 

16 
17 

20  I  S 


BLOCK?  11497(26351) 

1  (  T4  SYSTEM  )  IS 

2 

3 

4 

5 

6 
7 

10 

11 

12 

13 

14 

15 

16 
17 

20  I  S 


BLOCK:  11498(26352) 

1  (  CREATE  THE  RECORD  HEADER  FCW  1/21/82 
!  2 

|  3  1  'CODE  HBF  0  ' 

4  0  S)  1  LDA»  '  HBF  0  LDA»  1  0  ADD» 

5 

6  (  HEADER  ADDRESS  ON  STACK  ) 

7  :  RECORD-HEADER 

10  '  HBF  • 

11  STAR-NMBR  0  0  HBF  ! 

12  1SEC-CLK  2  HBF  D! 

13  ETBUF  2  +  4  HBF  16  WORDS  * 

14 

15 

16 
17 

20  IS 


MOD  1/25/82  ) 

PUT  JMP » 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9*  1982 


BLOCK!  11499(26353) 

1  (  RECORD  HEADER  ROUTINES  COMMENTS  FCU  1/21/82  )  5S 

2 

3  HBF  -  REPLACES  THE  #  ON  THE  STACK  WITH  THE  SUM  OF  THE  *  ON  THE 

4  STACK  AND  THE  HEADER  STARTING  ADDRESS. 

5 

6  RECORD-HEADER 

7  -  BUILD  THE  RECORD  HEADER  ACCORDING  TO  THE  HEADER  FORMAT. 
10 

11 

12 

13 

14 

15 

16 
17 
20 


BLOCK:  11500(26354) 

1  (  RECORD  HEADER  AND  l'ST  FRAME  OF  RECORD  FCW  1/8/82  ) 

2  (  MOD  2/11/82  > 

3 

4  BASE  0  DECIMAL 

5 

6  :  1' ST-FRAME 

7  32  GBUF  '  GBUF  8  CCDINIT  TIMETAGS 

10  RECORD-HEADER 

11  PTGMICROSEC  D@  26  HBF  D! 

12  CPATCH  28  HBF  4  WORDS 

13  El  STEP  CCD-DONE  DI  '  GBUF  !  * 

14 

15  BASE  ! 

16 
17 

20  *S 


BLOCK:  11501(26355) 


1  (  1ST  FRAME  COMMENTS  FCW  1/21/82  )  JS 

2  32  GBUF  RESERVES  32  WORDS  FOR  THE  RECORD  AND  FRAME  HEADERS. 

3  THE  PATCH  GENERATOR  IS  INITIALIZED  FOR  THE  NEXT  FRAME.  TIMETAGS 

4  CHECKS  THE  ET  BOARD  AND  DOES  NOT  RETURN  UNTIL  THE  NEW  FRAME  HAS 

5  STARTED.  THEN  THE  RECORD-HEADER  IS  CREATED  AND  THE  FRAME  HEADER 


*  WITH  THE  PHOTOGATE  TIME  AND  THE  PATCH  PARAMETERS. 

7  INTERRUPTS  ARE  ENABLED  FOR  THE  KEYBOARD*  THE  AUTO  STEP  ROUTINE 

10  IS  CALLED*  AND  THE  PROGRAM  WAITS  UNTIL  THE  THE  CURRENT  PATCH 

11  FRAME  IS  DONE.  THEN  INTERRUPTS  ARE  DISABLED  AND  THE  NEXT  FREE 

12  BUFFER  ADDRESS  STORED  IN  GBUF. 


13 
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T4  SYSTEM  PROGRAM  AS  OF  JULY  9*  1982 


BLOCK!  11502(26356) 


1 

2 

3 

4 

5 

6 
7 

10 

11 

12 

13 

14 

15 

16 
17 
20 


<  FRAMES  2»3»  t  4  OF  TAPE  RECORD  FCW  1/8/82  MOD  1/22/82  > 
:  REC-FRAME 

6  GBUF  DUP  '  GBUF  0  CCDINIT  TIMET AGS 
PTGMICROSEC  D@  ROT  D!  CPATCH  SWAP  2+4  WORDS 
El  STEP  CCD-DONE  DI  7  GBUF  !  i 

1  234-FRAMES  REC-FRAME  REC-FRAME  REC-FRAME  * 


BLOCK:  11503(26357) 


1 

2 

3 

4 

5 

6 
7 

10 

11 

12 

13 

14 

15 

16 
17 
20 


(  2» 3» 4  FRAME  COMMENTS  FCW  1/22/82  )  fS 

REC-FRAME  -  RECORD  1  CCD  FRAME  WITH  THE  FOLLOWING  FORMAT.* 

WORD  #  DESCRIPTION 

0  f  1  PHOTOGATE  IN  MICROSECONDS 

2-5  PATCH  PARAMETERS  (CPATCH) 

6  -  N  PIXEL  DATA 


BLOCK!  11504(26360) 

1  (  ALIAS  SET  BLOCK  FCW  06/08/81  MOD  01/21/82  ) 

2 

3  ALIAS  T4DATA  ALIAS  T4E0F 

4  .*  RECORD  '  TWRITE  '  T4DATA  *  '  EOF  '  T4E0F  !  t 

5 

6  RECORD 

7 

10  :  NOWRT  DROP  DROP  * 

11  :  SIM  '  NOWRT  '  T40ATA  !  '  NULL  '  T4E0F  !  I 

12 

13  SIM 

14 

15 

16 
17 

20  IS 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9.  1982 


BLOCK!  11505(26361) 


1 

2 

3 

4 

5 

6 
7 

10 

11 

12 

13 

14 

15 

16 
17 
20 


<  ALIAS  SET  BLOCK  COMMENTS  FCW  1/21/82  )  IS 

T4DATA  -  DUMMY  WRITE  ROUTINE 
T4E0F  -  DUMMY  EOF  ROUTINE 

RECORD  -  SET  UP  T4DATA  TO  THE  TAPE  WRITE  ROUTINE  AND  T4E0F 
TO  THE  TAPE  EOF  ROUTINE 

SIM  -  SET  UP  T4DATA  AND  T4E0F  TO  DO  NOTHING  AT  ALL 


BLOCK:  11506(26362) 

1  (  DATA  RECORDING  ROUTINES  FCW  1/8/82  MOD  2/8/82  ) 

2  :  1REC 

3  '  GBUF  6  DUP  1 'ST-FRAME  234-FRAMES 

4  '  GBUF  9  -  SWAP  T4DATA  I 

5 

6  '  GBUF  9  GBUFMARK  GBUFST 

7 

10  :  DATA-LOOP 

11  WELL  ZERO'  PCNT •  CINIT  ETINIT  TICK  DROP 

12  BEGIN  TICK  ETSCAN  END 

13  BEGIN  GBUFST  1REC  1REC  WELL  9  END 

14  CFIN  T4E0F  I 

15 

16  :  CURSOR  SIM  DATA-LOOP  I 

17  :  RUN  CURSOR  RECORD  FAST  GAP  GAP  DATA-LOOP  I 

20  IS 


BLOCK:  11507(26363) 

1  (  RECORDING  ROUTINES  COMMENTS  FCW  1/21/82  )  IS 

2 

3  1REC  -  ASSEMBLE  1  COMPLETE  RECORD  IN  MEMORY  AND  CALI.  T4WRITE 

4 

5  DATA-LOOP 

6  -  INITIALIZE  INTERRUPTS  AND  THE  EVENT  TIMER 

7  SET  UP  AN  INDEFINITE  LOOP*  SWITCHING  BE  TWEEN  2  BUFFERS 

10  DISABLE  INTERRUPTS  AND  CALL  T4E0F 

11 

12  CURSOR 

13  -  DO  DATA-LOOP  WITHOUT  WRITING  TO  TAPE 

14 

15  RUN  -  DO  DATA-LOOP  AND  RECORD  DATA  ON  TAPE 

16 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9.  1982 


BLOCK!  11508(26364) 

1  <  THESE  ROUTINES  ARE  HELPFUL  WHEN  RUNNING  THE  T4  SYSTEM  ) 

2  (  MOD  FCW  4/15/82  ) 

3  t  STIME  CR  *  TIME:  *  MST?  » 

4  :  TRUN  STIME  RECORD  FAST  GAP  GAP  DATA-LOOP  STIME  I 


10 

11 

12  0 

13  : 

14  : 

is  : 
16 

17  : 
20  is 


f CODE  REVERSE  CRATE  p 

'  REVERSE  3  LDA»  1  3)  0  LDAp  0  0  COMp  1  3)  0  STAp 
3  3)  0  LDAp  0  0  COMp  3  3)  0  STAp  NEXT  JMPp 

INTEGER  HLD-RATE  0  p  0  p  0  p 
HALT  CRATE  HLD-RATE  4  WORDS  STILL  I 
RESUME  HLD-RATE  CRATE  4  WORDS  I 

REVERSAL  HOME  CURSOR  TRUN  HALT  CURSOR  RESUME  REVERSE  TRUN 
-1  STAR-NMBR  !  I 

R  REVERSAL  I 


BLOCK:  11509(26365) 

1'  (  RUNTIME  ROUTINE  COMMENTS  FCW  1/21/82  MOD  4/15/82)  IS 

2  TRUN  -  SAME  AS  RUN  EXCEPT  IT  PRINTS  THE  TIME  ON  THE  TERMINAL  AT 

3  THE  BEGINNING  AND  END  OF  A  RUN. 

4  REVERSE  -  CHANGE  THE  DIRECTION  FLAGS  IN  CRATE 

5  HALT  -  SAVE  CURRENT  RATE  AND  REPLACE  WITH  STILL 

6  RESUME  -  RESTORE  RATE 

7  REVERSAL  -  DO  THE  DATA  RUN  IN  BOTH  DIRECTIONS 


BLOCK:  11510(26366) 


1  (  HORIZONTAL  RATES  FCW  12/03/81  MOD  1/26/82  ) 

2  BASE  9  DECIMAL 

3  39  0  RATE  EOO  39  0  RATE  EOS  40  0  RATE  E10  41  0  RATE  E15 

4  41  0  RATE  E20  43  0  RATE  E25  45  0  RATE  E30  48  0  RATE  E35 

5  51  0  RATE  E40  55  0  RATE  E45  61  0  RATE  E50  68  0  RATE  ESS 

6  77  0  RATE  E60  92  0  RATE  E65  114  0  RATE  E70  150  0  RATE  E75 

7  224  0  RATE  E80  447  0  RATE  E85 

10  -39  0  RATE  WOO  -39  0  RATE  W05  -40  0  RATE  W10  -41  0  RATE  W15 

11  -41  0  RATE  W20  -43  0  RATE  W25  -45  0  RATE  W30  -48  0  RATE  W35 

12  -51  0  RATE  W40  -55  0  RATE  W45  -61  0  RATE  W50  -68  0  RATE  W55 

13  -77  0  RATE  W60  -92  0  RATE  W65  -114  0  RATE  W70  -150  0  RATE  W 

14  -224  0  RATE  W80  -447  0  RATE  W85 

15  BASE  ! 

16 
17 

20  IS 


41  0  RATE  E15 


150  0  RATE  E75 


48  0  RATE  W35 
68  0  RATE  W55 
-150  0  RATE  W75 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9*  1982 


100 


BLOCK!  11481(26331) 

1  <  OPATCH  COMMENTS  FCW  1/22/82  )  IS 

2  THE  PATCH  IS  DEFINED  IN  HARDWARE  BY  4  COORDINATES  :  1)  START- 

3  ING  LINE;  2)  ENDING  LINE!  3)  STARTING  COLUMN!  I  4)  ENDING  COL- 

4  UMN*  THE  4  PATCH  COORDINATES  ARE  SELECTED  BY  A  'DOA  7*  INSTRUC- 

5  TION.  BITS  4-15  HAVE  THE  COORDINATE  VALUE  (RIGHT  JUSTIFIED). 

6  BITS  2  S  3  GO  TO  A  DECODER  TO  SPECIFY  WHICH  PARAMETER  IS  BEING 

7  OUTPUT.  THIS  TABLE  SHOWS  THE  SELECTION  MAPPING. 

10  - TABLE - 

11  BIT  «  PATCH 

12  2*3  PARAMETER 


0  *  0 

0  .  1 

1  »  0 

1  *  1 


STARTING  LINE 
ENDING  LINE 
STARTING  COLUMN 
ENDING  COLUMN 


20  (  CONTINUED  NEXT  BLOCK  ) 


BLOCK:  11482(26332) 

1  (  OPATCH  COMMENTS  FCW  1/21/82  )  ! S 

2  IN  ADDITION*  BIT  0  OF  THE  ‘DOA  7*  INSTRUCTION  HAS  A  SPECIAL 

3  FUNCTION.  IF  BIT  0  -  0*  THE  ODD  FIELD  IS  THE  FIRST  ONE  IN  A 

4  FRAME.  IF  BIT  0  «  1,  THE  EVEN  FIELD  IS  THE  FIRST  ONE  IN  A  FRAME. 

5  THIS  FEATURE  16  NOT  EXPLOITED  BY  THIS  PROGRAM  *  BIT  0  IS  ALWAYS 

6  SET  TO  0. 

7  THE  HARDWARE  CAN  HANDLE  A  CCD  ARRAY  OF  UP  TO  8192  ROWS  DY 

10  4096  COLUMNS.  THE  PATCH  SIZE  CAN  BE  FROM  2  ROWS  X  2  COLS  UP  TO 

11  THE  SIZE  OF  THE  CCD  ARRAY.  THE  LIMITING  FACTOR  IS  THE  WORD 

12  COUNT  REGISTER*  WHICH  LIMITS  THE  MAXIMUM  PATCH  SIZE  TO 

13  32*767  ELEMNTS. 

14  CHECK  THE  CCD  DATA  SHEETS!  THERE  ARE  ONE  OR  MORE  LINES  AT  THE 

15  BEGINNING  OF  EACH  FIELD  THAT  CONTAIN  NO  DATA*  AND  THERE  ARE  SEV- 

16  ERAL  COLUMNS  AT  THE  BEGINNING  OF  EACH  I.INE  WITH  NO  DATA. 

17  THEREFORE  IT  IS  USELESS  TO  SPECIFY  ONE  OF  THESE  LINES  OR  COLS 
20  AS  THE  STARTING  ROW/COL.  <  CONTINUED  NEXT  BLOCK  > 


BLOCK:  11483(26333) 


wni 


(  OPATCH  COMMENTS  FCW  1/21/82  >  iS 

THE  SOFTWARE  MUST  MAKE  SURE  THE  PATCH  IS  NOT  SITUATED  WHERE 
PART  OR  ALL  OF  THE  PATCH  EXTENDS  PAST  THE  CCD  BOUNDARIES.  FOR 
EXAMPLE*  SUPPOSE  THERE  ARE  100  PIXELS/LINE*  AND  THE  PATCH  IS 
20  COLUMNS  WIDE.  IF  THE  PATCH  STARTING  COL  ♦  IS  90*  10  COLS 
WILL  NOT  BE  USED.  THIS  WILL  ALSO  AFFECT  THE  MANNER  IN  WHICH 
THE  PIXEL  VALUES  ARE  PUT  T*ITO  THE  'EMORY  BUFFER. 

THE  HARDWARE  TREATS  BO  4  FIEL "  OF  A  FRAME  IDENTICALLY  (  WITH 
THE  EXCEPTION  OF  WHICH  IS  in*  IT  OF  THE  TWO).  THE  EFFECT  OF 
THIS  IS  TO  HALVE  THE  EFFECT  WE  *  OF  VERTICAL  STEPS.  THE  NET 
RESULT  IS  TWOFOLD.*  1)  THE  PATCH  MUST  HAVE  AN  EVEN  ♦  OF  LINES! 

*  2)  AND  BY  CHANGING  THE  LINE  ♦  BY  1 »  YOU  ARE  IN  EFFECT  CHANGING 
IT  BY  2. 


*■  ► 
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T4  SYSTEM  PROGRAM  AS  OF  JULY  9*  1982 


BLOCK?  11484(26334) 

1  <  PATCH  GENERATOR  CONTROL  ROUTINES  FCW  1/8/82  MOD  l/ll/e2  > 

2 

3  0  INTEGER  PCNT  (  WORD  COUNT  FOR  1  FRAME  ) 

4 

5  <  CALCULATE  WORD  COUNT  FOR  TRANSFER  > 

6  l  PCNT!  CPATCH  1+  @  CPATCH  3+0  *  MINUS  PCN  f  !  i 

7 

10  CODE  STCCD  (  BUFFER  ADDR  ON  STACK  ) 

11  0  S)  0  LDA*  7  DOB*  PCNT  0  LDA*  107  DOC*  POP  JMP* 

12 

13  :  CCD I NIT  OPATCH  STCCD  » 

14 

15  CODE  CCD-DONE  (  RETURN  NEXT  ADDR  IN  BUFFER  ON  STACK  ) 

16  HERE  7  SZB*  JMP*  7  DIB*  PUSH  JMP* 

17 

20  ‘t  S 


BLOCK!  11485(26335) 

1  (  PATCH  GENERATOR  CTRL  COMMENTS  FCW  1/21/82  )  *S 

2 

3  STCCD  -  OUTPUT  THE  BUFFER  ADDRESS  AND  WORD  COUNT  TO  PATCH  GEN- 

4  ERATOR  CARD  WHILE  STARTING  IT 

5 

6  CCDINIT  -  OUTPUT  PATCH  COORDINATES  AND  START  PATCH  GENERATOR 

7 

10  CCD-DONE  -  WAIT  FOR  PATCH  GENERATOR  TO  FINISH.  RETURN  THE  NEXT 

11  FREE  BUFFER  ADDRESS  ON  THE  STACK 

12 
13 
.14 

15 

16 
17 
20 


BLOCK:  11486(26336) 


1 

'> 

3 

4 


(  T4  INTERRUPT  HANDLER 


0  INTEGER  IVECT 
IUECT  INTEGER  IVCT 
0  INTEGER  REGS  0  , 


177 


FCW  1/8/82  MOD  4- 
<,  LEGAL  CHAR  DELIMITER 
62677  CPU  10RST * 
0*0*  (  AC0-AC3 *  CY 


13-82  > 


) 


5  CODE 

INTERRUPT 

6  10 

SND*  IF* 

7 

REGS  0  STA*  REGS  1+  1 

10 

REGS  3+3  STA* 

0  0  M 

11 

110  DIA*  #177  1 

LDA* 

12 

0  2  ADD*  0  2) 

I)  JMP 

13 

ELSE* 

14 

277  DIB*  IORST* 

ABORT 

15 

THEN* 

16 

17  » S 

>TA*  REGS  2  +  : 
>f  +C  /2  REGS  ' 
0  AND*  IVCT  2 


I)  JMP* 


DP  +! 


1  STA. 

+  0  STA* 
L.DA  * 
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BLOCK:  11478(26326) 


1  <  AUTO  PATCH  STEP  ROUTINES  FCW  1/20/82  MOD  1/25/82  ) 

2 

3  SCA  DSZf  <  COLUMN  COUNTER  ) 

4  IFf 


5 

0  3)  0  LDAf  SCA 

0 

STAf 

6 

IFf 

7 

2  2)  0  LDAf  0 

0 

INCf 

10 

1  0  MOUf  2  2) 

0 

STAf 

11 

ELSE* 

12 

2  2)  0  LDAf  0 

0 

DECf 

13 

1  0  MOVf  2  2) 

0 

STAf 

14 

THENf 

15 

THENf 

16 

N  2  LDAf  NEXT  JMPf 

17 

20 

IS 

SCA  1+  0  LDAf  0  0  MOUf  SPL 
LIMITS  3+1  LDAf  0  1  SUBf  *  SNC 

LIMITS  2+1  LDAf  0  1  ADCf  *  SZC 


BLOCK:  11479(26327) 

1  (  PATCH  STEP  COMMENTS  FCW  1/20/82  )  IS 

2 

3  'STEP'  IS  CALLED  ONCE  PER  FRAME.  THE  COUNTS  STORED  AT  SCA 

4  AND  SCA+2  ARE  DECREMENTED.  WHEN  THE  COUNT  ='S  Of  THE  COUNT  IS 

5  RESTORED  AND  THE  DIR  FLAG  IS  CHECKED.  IF  THE  FLAG  IS  NEGf  THE 

6  STARTING  LINE/COL  *  IS  DECREMENTED  AND  CHECKED  AGAINST  THE  LOWER 

7  LIMIT.  IF  #<LIMITf  THE  LIMIT  IS  SUBSTITUTED*  OTHERWISE  THE 

10  DECREMENTED  #  IS  USED.  IF  THE  FLAG  IS  POSf  THE  STARTING  LINE/COL. 

11  IS  INCREMENTED  AND  CHECKED  AGAINST  THE  UPPER  LIMIT.  IF  #>LIMIT 

12  THE  LIMIT  IS  USED?  OTHERWISE  THE  INCREMENTED  *  IS  USED. 

13 

14 

15 

16 
17 
20 


BLOCK:  11480(26330) 


1  (  SEND  PATCH  PARAMETERS  TO  CCD  INTERFACE  11/25/80  ) 

2  (  MOD  FCW  1/21/82  ) 

3  (  USE  BITS  2*3  OF  12  BIT  DATA  WORD  AS  REGISTER  SELECT  ) 

4  (  2» 3  =  00  START  LINEf  01  END  LINEf  10  START  COL*  11  END  COL  ) 

r, 


6 

7 

10 

11 

12 

13 

14 

15 

16 
17 
20 


10000  INTEGER  INCRM  (  REGISTER  SELECT  INCREMENT  ) 

(  ADD  OFFSET  TO  PARAMETER  AND  SEND  IT.  INC  OFFSET  FOR  NEXT  ) 
SUBROUTINE  SEND  1  0  ADD*  7  DOA*  INCRM  3  LDA*  3  1  ADD*  RETURN 


2  f CODE  OPATCH 
1  1  SUBf 
3  3  MOV*  /2 

3  2)  3  LDAf 


IS 


0  F  CPATCH  F 
0  2)  0  LDAf 
0  2)  0  LDAf 
2  2)  0  LDAf 
2  2)  0  LDAf 


'  OPATCH  DUP  2  S  r  A  *  1+2  LDAf 

SEND  JSRf  1  2)  3  LDA* 

3  0  ADD*  0  0  DEC*  SEND  JSR* 
SEND  JSR* 

3  0  ADD*  0  0  DEC*  SEND  JSRf 


OPATCH  2  LDAf  NEXT  JMPf 
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BLOCK:  11475(26323) 

1  <  TIMETAG  ROUTINE  COMMENTS  FCW  1/20/82  )  ?S 

2 

3  ?CCB  -  MONITOR  THE  CCD  ADDRESS  COUNTER  AND  DO  NOT  RETURN  UNTIL 

4  IT  CHANGES.  THIS  ENSURES  THAT  THE.  PHOTOGATE  TIME  AT  THE 

5  START  OF  THE  CURRENT  FRAME  IS  THE  ONE  STORED  IN  ETBUF . 

6 

7  1SEC  -  HOLD  THE  VALUE  OF  THE  HARDWARE  1  SEC  COUNTER.  THIS  IS 

10  CHECKED  AGAINST  THE  1  SEC  COUNTER  AND  IF  DIFFERENT, 

11  ' 1SEC *  IS  UPDATED  WITH  THE  NEW  VALUE  AND  AN  ETSCAN  IS 

12  DONE  TO  MAKE  SURE  THE  DMAMICROSEC  IS  UPDATED.  THIS 

13  PREVENTS  THE  2  CLOCKS  FROM  GETTING  OUT  OF  PHASE. 

14 

15  TIMETAGS  -  DO  ETSCAN  AND  UPDATE  THE  1SEC  CLK  IF  NECESSARY . 

16 
17 
20 


BLOCK*.  11476(26324) 

1  (  AUTO  PATCH  STEP  ROUTINES  FCW  1/20/82  MOD  4/19/82  ) 

2  BASE  0  DECIMAL 

3  1  INTEGER  LIMITS  47  ,  1  ,  94  ,  BASE  ! 

4  0  INTEGER  SCA  0,0,0* 

5  2  »CODE  STEP  CRATE  ,  CPATCH  . 


6 

N  2  STA,  '  STEP  3 

LDA,  ' 

STEP  1+  2  LDA,  SCA 

't 

+ 

DSZ , 

7 

IF, 

( 

LINE 

<ROW>  COUNTER  ) 

10 

2  3)  0  Lit  A »  SCA 

2 

+  0  STA,  SCA  3+0  LDA, 

0 

0 

MOV,  SPL 

11 

IF, 

12 

0  2)  0  LDA ,  0 

0 

INC, 

LIMITS  1+  1  LDA,  0 

1 

SUB,  #  SNC 

13 

1  0  MOV,  0  2) 

0 

STA, 

14 

ELSE, 

15 

0  2)  0  LDA,  0 

0 

DEC, 

LIMITS  1  LDA,  0  1 

ADC 

'  f 

*  szc. 

16 

1  0  MOV,  0  2) 

0 

STA, 

17 

THEN, 

20 

THEN, 

;s 

BLOCK:  11477(26325) 

1  (  PATCH  STEP  COMMENTS  FCW  1/20/82  )  ? S 

r> 

3  LIMITS  -  THESE  ARE  THE  UPPER  AND  LOWER  LIMITS  OF  THE  STARTING 

4  LINE/COLUMN  #.  THE  LIMITS  DO  NOT  GO  TO  100  DUE  TO  THE 

5  HEIGHT  AND  WIDTH  OF  THE  PATCH. 

6 

7  SCA  -  THIS  IS  A  SCRATCH  AREA.  CRATE  IS  COPIED  HERE. 

10 

11 

12 

13 

14 

15 

16 
17 
20 
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BLOCK?  11472(26320) 

1  <  8  CHAN.  ET  BOARD  DRIVER  ROUTINES  FCW  1/20/82  MOD  1/20/82  ) 

2  CODE  ETSCAN 

3  NXTBUF  JSR *  4205  DOC.  4005  DIB*  105  DOB*  N  0  LDA* 

4  01  SUB*  SNR 

5  IF* 

6  11  MOV*  /2  SNR 

7  IF* 

10  N  1+  1  STA*  ETTIME  JSR* 

11  THEN* 

12  THEN* 

13  NEXT  JMP* 

14 

15  CODE  ETINIT 

16  ETVAR  443  LDA*  0  3)  0  LDA*  3  3)  0  STA*  305  DOB* 

17  2  3)  0  LDA*  105  DOC*  NEXT  JMP* 

20  >S 


BL.OCKJ  11473(26321) 

1  (  8  CHAN.  ET  BOARD  COMMENTS  FCW  1/20/82  ) 

2 

3  'ETSCAN*  IS  THE  MAIN  ROUTINE.  IT  GETS  THE  NEXT  BUFFER* 

4  RESTARTS  THE  ET  BOARD*  AND  CHECK  TO  SEE  IF  ANYTHING  WAS  TRANS-- 

5  FERRED.  IF  SOMETHING  WAS*  IT  CALLS  ETTIME  TO  SORT  AND  STORE 

6  THE  TIMES. 

7 

10  'ETINIT*  SETS  THE  BUFFER  ADDRESS*  OUTPUTS  THE  ADDRESS 

11  TO  THE  ET  BOARD*  OUTPUTS  A  WORD  COUNT  OF  26  (OCTAL)  TO  THE 

12  ET  BOARD*  AND  STARTS  IT. 

13 

14 

15 

16 
17 
20 


BLOCK.*  11474(26322) 

1  <  TIMETAG  ROUTINES  FOR  DATA  RUNS  FCW  1/8/82  MOD  1/11/82  ) 

2 

3  ETBUF  16  4  CONSTANT  DMAMICROSEC 

4  ETBUF  CONSTANT  PTGMICROSEC 

5 

6  CODE  ?CCD 

7  4007  DIB.  HERE  7  DIB*  1  0  SUB.  SNR  JHP •  NEXT  JMP* 

10 

IJ  0  INTEGER  1SEC 


12 

.*  TIMETAGS 

13 

?CCO  ETSCAN 

1PPSCLK  DUP  1SEC  0  - 

14 

IF  DROP  ELSE 

1SEC  !  ETSCAN  THEN 

15 

16 

:  1SEC-CLK 

17 

TIME  D0  1SEC 

0  0 

D4  i 

2  Q 

IS 

9 
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BLOCK!  11469(26315) 

1  <  REAL  TIME  CLOCK  COMMENTS  FCW  1/22/82  )  IS 

2 

3  'ADJTIME'  CALLS  'CHKBD'  AND  DEPENDING  ON  WHICH  KEY  WAS 

4  PRESSED  (IF  ANY)  DOES  THE  FOLLOEING:  1)  DECREMENTS  THE 

5  BASE  TIME »  2)  ,  +  /  INCREMENTS  THE  BASE  TIME;  &  3)  'CR'  SETS 

6  A  FLAG  TO  EXIT  THE  LOOP  IN  CHNTIMEf 

7 

10  'CHKTIME *  SETS  UP  A  LOOP  THAT  PRINTS  THE  TIME  ONCE  PER 

11  SECOND  AND  CALLS  * ADJTIME 1  TO  MODIFY  THE  TIME  IF  NECESSARY, 

12 

13  *MST •  SETS  THE  BASE  TIME  TO  THE  VALUE  ON  THE  STACK,  CLEARS 

14  THE  HARDWARE  COUNTER ,  AND  CALLS  CHKTIME,  THE  TIME  IS  ENTERED 

is  as  follows:  hh:mm:ss.  mst  (cr> 

16  BEFORE  TYPING  IN  THE  TIME  MAKE  SURE  THE  BASE  IS  DECIMAL. 

17  ALSO  BE  SURE  NOT  TO  FORGET  THE  DECIMAL  PT . 

20 


BLOCK:  11470(26316) 

1  (  8  CHANNEL  EVENT  TIMER  BOARD  DRIVER  ROUTINES  04/15/81  ) 

2 

3  0  INTEGER  ETBUF  HERE  DUP  1-  SWAP  20  DUP  DP  +!  WORDS 

4 

5  26  DUP  GBUF  DUP  INTEGER  ETVAR  OVER  GBUF  +  ,  MINUS  ,  0  ,  ETVAR  . 

6  ETBUF  , 

7 

10  SUBROUTINE  NXTBUF 

11  ETVAR  3+1  LDA ,  ETVAR  1+  0  LDA,  1  0  SUB, 

12  ETVAR  3+0  STA,  N  1  ST A,  ETVAR  2  +  1  LDA,  RETURN 

13 

14  SUBROUTINE  ETTIME 

15  HERE  N  I)  0  LDA,  7  1  LDA,  0  1  AND,  *2 

16  ETVAR  5+3  LDA,  1  3  ADD,  1  3)  0  STA,  N  ISZ, 

17  N  I)  0  LDA,  0  3)  0  STA,  N  ISZ,  N  1+  DSZ,  JMP, 

20  RETURN  ;S 


BLOCK:  11471(26317) 

1  (  8  CHANNEL  ET  BOARD  DRIVER  COMMENTS  FCW  1/20/82  )  ?S 

n 

3  THESE  ROUTINES  TAKE  THE  TIMES  PLACED  IN  MEMORY  BY  THE  ET 

4  BOARD,  AND  PLACE  THEM  BY  ORDER  OF  THEIR  CHANNEL  #  IN  ETBUF. 

5  TIMES  USED  BY  THE  PROGRAM  ARE  ACCESSED  FROM  ETBUF, 

6 

/  'NXTBUF '  FLIPS  BACK  AND  FORTH  BETWEEN  TWO  (2)  CONSECUTIVE 

10  BUFFERS.  WHILE  ONE  IS  BEING  TILLED  THE  OTHE  IS  BEING  PROCESSED, 

11  THE  ALGORITHM  USED  IS  J 

12  (NEW  BUF  ADDR )  =  2*(1ST  BUFADDR)  +  26  -  (PREV  BUFFER  A DDR  > 

13 

14  'ETTIME*  SCANS  THE  TIMES  PLACED  IN  THE  BUFFER  AND  PLACES 

15  THEM  IN  THEIR  RESPECTIVE  PLACE  IN  'ETBUF'. 

16 
I  7 
20 
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BLOCK:  11466(26312) 

1  <  REAL  TIME  CLOCK  ROUTINES  06/08/81  ) 

2  <  MOD  FCW  2/8/82  ) 

3  CODE  C5  305  DOA,  205  NIO*  NEXT  JMP, 

4  CODE  STTI  110  NIO,  NEXT  JMP, 

5  1  » CODE  TICK  0  ,  '  TICK  1  LDA,  5  DIA.  0  1  SUB,  SNR 

6  IF,  '  TICK  0  STA,  2  0  LDA,  ELSE »  0  0  SUB ,  THEN,  PUSH  JMP, 

7  CODE  1PPSCLK  5  DIA,  PUSH  JMP, 

10 

11  CODE  CHKBD  10  SZB,  IF,  110  DIA,  #177  1  LDA ,  1  0  AND,  ELSE, 

12  00  SUB,  THEN,  PUSH  JMP, 

13 

14  BASE  8  DECIMAL 

15  J  HMS  F  8  -ROT  60  D/MOD  -ROT  60  D/MOD  -ROT  24  D/MOD  -R01  DDROP 

16  48  F  1H  2  F  !  ,  1  t*  ,  '  .  32  F  1H  F  !  I 

17  I  HMS.  D8  HMS  i 

20  BASE  '  tS 


BLOCK!  11467(26313) 

1  (  REAL  TIME  CLOCK  ROUTINES  COMMENTS  FCW  1/20/82  >  FS 

2 

3  THESE  ROUTINES  ARE  USED  TO  SYNCHRONIZE  THE  FIRMWARE  CLOCK 

4  TO  THE  DATAMETRICS  1  SEC  CLOCK.  THE  1PPS  FROM  THE  DMA  CLOCK 

5  CLOCKS  A  HARDWARE  COUNTER  ON  THE  EVENT  TIMER  BOARD.  THIS  16 

6  BIT  COUNT  IS  ADDED  TO  A  32  BIT  ♦  IN  MEMORY  (  A  *  BASE  *  COUNT  ) 

7  TO  FORM  THE  CORRECT  TIME-OF-DAY.  THE  TIME  IS  SET  BY  FIRST 

10  CLEARING  THE  16  BIT  HARDWARE  COUNTER,  AND  THEN  ADJUSTING  THE 

11  *  BASE  *  COUNT  UNTIL  THE  SUM  OF  THE  BASE  COUNT  AND  THE  COUNTER 

12  IS  EQUAL  TO  THE  TIME  DISPLAYED  ON  THE  DMA  CLOCK. 

13 

14  C5  -  RESET  CTR  TO  0,  STOP  DMA  ACTIVITY 

15 

16  HMS,  -  PRINT  OUT  THE  DOUBLE  PRECISION  ♦  ON  THE  STACK  IN  THE 

17  FORMAT  HHJMM.’SS 
20 


BLOCK:  11468(26314) 

1  (  MORE  REAL  TIME  CLOCK  ROUTINES  06/08/81  MOD  4/14/82  ) 

2 

3  :  GETTIME  TIME  D8  1PPSCLK  0  D+  I 

4  :  MST?  GETTIME  HMS  i 

5  53  CONSTANT  '+'  55  CONSTANT  15  CONSTANT  CRTN 

6  :  -TIME  TIME  D8  1.  D-  DABS  TIME  D'  i 

7  :  +TIME  TIME  Dff  1.  D+  TIME  D!  I 
10 

1 1  :  ADJTIME  CHKBD  DUP  CRTN  *  IF  DROP  1 

12  FLSE  DUP  '  +  '  -  IF  DROP  +TIME  0 

13  ELSE  DUP  -  IF  DROP  -TIME  0 

14  ELSE  DROP  0  THEN  THEN  THEN  » 

15 

lo  :  CHKTIME  STTI  BEGIN  TICK  IF  MST?  CR  THEN  ADJTIME  END  i 
17  J  GMT  C5  TIME  Df  CHKTIME  I 
20  i  S 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9.  1982 


BLOCK:  11463(26307) 

1  (  PATCH  PARAMETER  COMMENTS  FCW  1/22/82  )  » S 

2 

3  CPATCH  -  CURRENT  PATCH 

4 

5  'PATCH*  IS  USED  TO  DEFINE  A  WORD  WHICH  WHEN  INVOKED  WILL 

6  PLACE  A  SPECIFIED  PATCH  POSITION  AND  SIZE  IN  'CPATCH'.  THE 

7  PARAMETERS  ARE  TYPED  IN  THE  SAME  ORDER  AS  THEY  APPEAR  IN 

10  'CPATCH*.  THEN  THE  WORD  'PATCH'  IS  TYPED  FOLLOWED  BY  WHATEVER 

11  NAME  IS  TO  BE  USED.  IN  THEIS  CASE  'HOME'.  WHEN  'HOME'  IS  USED. 

12  IT  WILL  PLACE  40.  10.  10.  S  6  IN  'CPATCH'. 

13 

14 

15 

16 
17 
20 


BLOCK:  11464(26310) 

1  (  PATCH  RATE  PARAMETER  ENTRY  FCW  1/20/82  ) 

2  (  HOR  COUNT.  HOR  DIR  FLAG.  VERT  COUNT.  VERT  DIR  FLAG  ) 

3  0  INTEGER  CRATE  0.0.0.  CRATE  . 

4  ‘.  RATE  CONSTANT  .  .CODE  2  1  MOV.  CRATE  4  +  2  LDA.  0  0  SUB. 

5  0  2)  0  STA.  1  2)  0  STA.  2  2)  0  STA.  3  2)  0  MTA. 

6  0  3)  0  LDA.  0  0  MOV.  #  *2  SNC 

7  IF.  3  2)  0  STA.  0  0  NEG.  2  2)  0  STA. 

10  ELSE.  2  2)  0  STA. 

11  THEN. 

12  1  3)  0  LDA.  0  0  MOV.  *  *2  SNC 

13  IF.  1  2)  0  STA.  0  0  NEG.  0  2)  0  STA. 

14  ELSE.  0  2)  0  STA. 

15  THEN. 

16  12  MOV.  NEXT  JMP, 

17  0  0  RATE  STILL  STILL 

20  .  S 


BLOCK:  11465(26311) 

1  (  PATCH  RATE  COMMENTS  FCW  1/22/82  )  » S 

2  CRATE  -  CURRENT  RATE 

3 

4  'RATE*  DEFINES  A  WORD  WHICH  WILL  SET  UP  'CRATE*  ACCORDING  10  T 

5  THE  NUMBERS  ENTERED  WHEN  THE  WORD  WAS  DEFINED.  TO  USE  'RATE*  DO 

6  THE  FOLLOWING.*  TYPE  IN  2  NUMBERS.  FOLLOWED  BY  'RATE*.  THEN  BY 

7  THE  NAME  OF  THE  NEW  RATE.  THE  1 ' ST  *  IS  THE  HORIZONTAL  RATE  - 

10  A  POSITIVE  VALUE  WILL  MOVE  THE  PATCH  TO  THE  RIGHT.  A  NEGATIVE 

11  VALUE  TO  THE  LEFT,  THE  2ND  ♦  IS  THE  VERTICAL  RATE  -  A  POS. 

12  VALUE  WILL  MOVE  THE  PATCH  UP.  WHILE  A  NEG.  VALUE  WILL  MOVE  IT 

13  DOWN.  (  SEE  ’OPATCH'  COMMENTS  FOR  VERTICAL  STEP  PECULIARITIES). 

14  THE  COUNTER  TAKES  THE  ABSOLUTE  VALUE  OF  1  HE  *  ENTERED  AND  COUNTS 

15  DOWN  TO  ZERO.  THUS  A  VALUE  OF  1  WILL  BE  THE  FASTI'S!  RATE.  AND  A 

16  VALUE  OF  0  WILL  BE  THE  SLOWEST.  THE  *  IS  DECREMENTED  ONCE  PER 

17  FRAME.  FOR  EXAMPLE.  IF  THE  FRAME  RATE  IS  40  HZ.  A  COUNT  OF  40 
20  WILL  MOVE  THE  PATCH  ONCE  EVERY  SECOND. 
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BLOCK!  11460(26304) 

1  <  BUFFER  MANAGEMENT  FCW  1-8-82  MOD  5/24/82  ) 

2 

3  1  *CODE  GBUF  0  * 

4  0  3)  0  LDA*  0  S)  1  LDA*  0  1  ADD*  0  3)  1  STA*  PUT  JMP* 

5 

6  t  GBUFMARK  CONSTANT  I  CODE 

7  0  3)  0  LDA*  '  GBUF  0  STAt  NEXT  JMP* 

10 

11  40000  CONSTANT  BUF 

12  BUF  GBUFMARK  GBUF INITIALIZE 

13  GBUFINITIALIZE 

14 

15 

16 
17 

20  I  S 


BLOCK!  11461(26305) 

1  (  BUFFER  MANAGEMENT  COMMENT  BLOCK  FCW  1/20/82  )  *S 

2 

3  *  GBUF  *  RETURNS  A  BUFFER  ADDRESS.  WHEN  GBUF  IS  CALLED  • 

4  THE  TOP  STACK  ITEM  IS  THE  ♦  OF  WORDS  TO  BE  RESERVED.  THIS 

5  •  IS  ADDED  TO  THE  NEXT  FREE  BUFFER  ADDRESS  AND  SAVED  FOR  THE 

6  NEXT  TIME  GBUF  IS  CALLED. 

7 

10  • GBUFMARK ■  DEFINES  A  CONSTANT  THAT  WHEN  INVOKED  WILL  PLACE  TH 

11  VALUE  IN  ITS  PARAMETER  FIELD  IN  THE  PARAMETER  FIELD  OF  ’GBUF* 

12  INSTEAD  OF  ON  THE  STACK. 

13 

14 

15 

16 
17 
20 


BLOCK:  11462(26306) 

1  (  PATCH  PARAMETER  ENTRY  FCW  1/22/82  ) 

2 

3  (  STARTING  ROW*  ♦  ROWS*  STARTING  COLUMN*  •  COLS  ) 

4  0  INTEGER  CPATCH  0  *  0  *  0  *  CPATCH  * 

5 

6  :  EVACO*  0  0  INC*  *  /2  SNC  0  0  INC*  I 

7 

10  :  PATCH  CONSTANT  *  »  ♦  I CODE  2  1  MOV*  CPATCH  4+2  LDA* 

11  0  3)  0  LDA*  EVACO*  3  2)  0  STA*  1  3)  0  LDA*  2  2)  0  STA* 

12  2  3)  0  LDA*  EVACO*  1  2)  0  STA*  3  3)  0  LDA*  0  2)  0  STA* 

13  1  2  MOV*  NEXT  JMP* 

14 

15  40  10  10  6  PATCH  HOME 

16 

17  HOME 
20  IS 
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BLOCK!  11511(26367) 

1  (  HOR.  RATE  COMMENTS  FCW  1/21/82  >  IS 

2 

3  THESE  RATES  ARE  SET  UP  IN  INCREMENTS  OF  5  DEG.  OF  DECLINATION. 

4  AN  'EAST7  RATE  MOVES  THE  PATCH  FROM  LEFT  TO  RIGHT  ON  THE 

5  DISPLAY.  A  'WEST'  RATE  MOVES  THE  PATCH  FROM  RIGHT  TO  LEFT  ON  THE 

6  DISPLAY.  THE  FRAME  FREQUENCY  FOR  THESE  RATES  IS  40  HZ. 

7 

10 

11 

12 

13 

14 

15 

16 
17 
20 


BLOCK:  11512(26370) 

1  (  BACKGROUND  SETTING  ROUTINES  FCW  1/8/82  2/8/82  ) 

2 

3  24  12  47  10  PATCH  CENTER 

4 

5  :  1 -PATCH  PCNT!  '  GBUF  0  CCDINIT  CCD-DONE  DROP  I 

6 

7  :  AVG 

10  0.  '  GBUF  0  DUP  PCNT  0  MINUS  +  SWAP 

11  DO  I  0  0  D+  LOOP 

12  PCNT  0  MINUS  D/MOD  DROP  I 

13 

14  :  BACKGROUND 

15  CURSOR  STTI 

16  BEGIN  1-PATCH  ■  AVG*  *  AVG  D.  CR 

17  77777  0  DO  LOOP  CHKBD  END  I 
20  IS 


BLOCK:  11513(26371) 

1  (  BACKGROUND  COMMENTS  FCW  1/21/82  )  IS 

2 

3  THE  BACKGROUND  ROUTINES  ARE  FOR  SETTING  THE  VIDEO  BIAS  TO  THE 

4  PROPER  LEVEL.  THE  LEVEL  SHOULD  BE  IN  THE  RANGE  OF  100-200 

5  WITHOUT  SUBTRACTION!  IF  SUBTRACTION  IS  USED*  IT  SHOULD  BE  SET 

6  TO  APPROXIMATELY  200-400*  DEPENDING  ON  THE  AMOUNT  OF  SUBTRACTION 

7  USED.  THE  MAIN  POINT  IS  TO  GET  A  UNIFORM  BACKGROUND  AS  SEEN  ON 

10  THE  DISPLAY.  MAKE  ABSOLUTELY  SURE  THAT  NO  LIGHT  ENTERS  THE 

11  CAMERA  WHILE  DOING  THE  BACKGROUND  ADJUSTMENT  -  OTHERWISE 

12  THE  ADJUSTMENT  WILL  BE  WRONG. 

13 

14 

15 

16 
17 
20 
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BLOCK!  11514(26372) 

1  <  A-D  VALUE  DISPLAY  ROUTINES  FCW  1/25/82  MOD  4/15/82  ) 

2 

3  1  AD V- DUMP 

4  CPATCH  3+8  COLUMNS  CR  10  F  ! 

5  1-PATCH  '  GBUF  0  DUP  PCNT  8  MINUS  +  SWAP 

6  DO  I  0  0.  CR#  LOOP  « 

7 

10  :  ADV  ADV-DUMP  I 

11 

12  1  CADV  '  GBUF  0  PCNT  0  OVER  OVER  +  ROT  ROT  MINUS  +  SWAP  CR 

13  DO  I  0  0.  CR#  LOOP  I 

14 

15  t  C  CURSOR  ADV  I 

16 
17 

20  IS 


BLOCK!  11515(26373) 

1  (  A-D  VALUE  COMMENTS  FCW  1/25/82  )  IS 

2 

3  ADV-DUMP 

4  -  GET  SOME  A-D  VALUES  AT  THE  CURRENT  PATCH  LOCATION.  PRINT 

5  OUT  THE  VALUES  WITH  AS  MANY  COLS  AS  IN  THE  PATCH 

6  <  UP  TO  10  COLS).  THE  FIELDS  ARE  PRINTED  OUT  SEPERATELY I 

7  I.E.-  THEY  ARE  NOT  INTERLEAVED. 

10 

11  ADV  -  NAME  USED  FOR  BREVITY 

12 

13  CADV  -  PRINT  OUT  THE  VALUES  OF  THE  LAST  FRAME  BEFORE  THE  RUN  OR 

14  CURSOR  MODE  WAS  TERMINATED. 

15 

16 
17 
20 


BLOCK:  11516(26374) 

1  ( 

2 

3  ( 

4  : 

5 

6 
7 

10  ( 

11  : 

12 

13 

14 

15 

16 
17 

20  IS 


PATCH  INITIALIZATION  ROUTINES  FCW  4/22/82  MOD  4-22-82  > 

SET  THE  STARTING  'HOME'  POSITION  OF  THE  CURSOR  > 

POSITION 

HOME  STILL  CURSOR  CPATCH  0  '  HOME  3  +  ! 

CPATCH  2  +  0  '  HOME  1  ♦  !  I 

#  RQWS  UNDER  STACK t  #  COLUMNS  ON  TOP  OF  STK  ) 

RXC  '  HOME  !  '  HOME  2  +  !  I 
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BLOCK?  11517(26375) 

1  <  PATCH  INITIALIZATION  COMMENTS  FCW  4/22/82  MOD  4-22-82  )  fS 

2 

3  POSITION  -  POSITION  DEFINES  WHERE  THE  'HOME'  POSITION 

4  OF  THE  CURSOR  IS.  TO  USE,  TYPE  'POSITION*  AND  RETURN, 

5  AND  MOVE  THE  CURSOR  TO  THE  DESIRED  PLACE.  THEN  TYPE 

6  RETURN  AND  THAT  POSITION  WILL  BE  SAVED. 

7 

10  RXC  -  RXC  IS  USED  TO  CHANGE  THE  PATCH  SIZE.  TWO  PARAMETERS  ARE 

11  entered:  i>  the  #  of  rows:  &  2)  the  #  of  columns,  the  # 

12  OF  ROWS  MUST  BE  AN  EVEN  THE  #  OF  COLUMNS  CAN  BE  EITHER 

13  EVEN  OR  ODD.  THE  FOLLOWING  EXAMPLE  WILL  SET  THE  PATCH 

14  SIZE  TO  10  ROWS  BY  7  COLUMNS.  THE  '*'  IS  A  PROMPT. 

15 

16  *10  7  RXC  <RETURN> 


BLOCK:  11518(26376) 
1  (  EMPTY  BLOCK  ) 


BLOCK:  11519(26377) 


(  EMPTY  BLOCK  > 
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BLOCK!  1 1376(26160) 

1  <  SIMPLE  MINDED  TAPE  HANDLER.  FCW  12/09/80  MOD  2/23/82  ) 

2  <  ASSUMES  ONLY  TAPE  UNIT  #0  EXISTS  ) 

3 

4  OCTAL 

5 

6  :  TAPE  i 

7 

10  <  LTB  =  LENGTH  OF  TAPE  BLOCK  ) 

11  0  INTEGER  LTB  0  ,  -1001  *  -1402  , 

12 

13  47  CONSTANT  CUR  0  CUR  ! 

14 

15 

16  161  LOAD  162  LOAD  163  LOAD  164  LOAD  165  LOAD  1 66  LOAD 

17  i  S 
20  i  S 


BLOCK!  11377(26161) 

1  (  USEFUL  TAPE  UTILITIES  02/26/81  ) 

2  <  TRDY  GIVES  UP  CONTROL  TO  THE  MULTITASKER  AND  DOES  NOT  ) 

3  <  RETURN  UNTIL  THE  TAPE  STATUS  IS  NOT  BUSY  ) 

4  SUBROUTINE  TRDY  HERE  WAIT  JSR,  1  1  SUB.  22  DIA. 

5  00  MOV,  /2  1  1  MOV.  *2  +C  0  0  SUB.  22  SNB.  0  0  INC, 

6  0  1  AND,  SNR  JMP,  RETURN 

7  <  WRITE  3  INCH  GAP  ON  TAPE  AT  CURRENT  POS.  OF  TAPE  ) 

10  1  .CODE  GAP  70  ,  TRDY  JSR,  '  GAP  0  LDA,  122  DOA.  NEXT  JMP, 


<  REWIND  TAPE  TO  BEGINNING  OF  TAPE  MARKER  ) 

1  .CODE  REWIND  10  ,  TRDY  JSR,  '  REWIND  0  LDA.  122  DOA. 

0  0  SUB,  CUR  0  STA.  NEXT  JMP, 

(  WRITE  EOF  AT  CURRENT  POSITION  OF  TAPE  > 

1  .CODE  WE OF  60  ,  TRDY  JSR,  '  WEOF  0  LDA,  122  DOA,  CUR  ISZ. 

NEXT  JMP,  iS 


BLOCK:  11378(26162) 

1  (  MORE  TAPE  UTILITIES  03/03/81  ) 

2  30  INTEGER  XCOM  40  ,  (  FWDSPC  ,  BCKSPC  COMMANDS  ) 

3 

4  (  FORWARD  SPACE  #  OF  RECORDS  ON  STACK  ) 

5  CODE  FWDSPC  TRDY  JSR,  0  S)  1  LDA,  1  0  NEG,  SNR 

6  IF,  222  DOC,  XCOM  0  LDA,  122  DOA,  CUR  3  LDA,  1  3  ADD, 

7  CUR  3  STA,  TRDY  JSR,  THEN,  POP  JMP, 


11  (  BACK  SPACE  ♦  OF  RECORDS  ON  STACK  > 

12  CODE  BCKSPC  TRDY  JSR,  0  S)  1  LDA,  1  0  NEG,  SNR  IF, 

13  222  DOC,  XCOM  1+0  LDA,  122  DOA,  CUR  3  LDA,  1  3  SUB, 

14  CUR  3  STA,  TRDY  JSR,  THEN,  POP  JMP, 


16  :  BKUP  1  BCKSPC  1  BCKSPC  1  FWDSPC  i 

17  :  EOF  WEOF  WEOF  BKUP  I 
20  IS 
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BLOCK!  11379(26163) 

1  <  TAPE  CONTROLLER  ERROR  CHECKING  FCW  11/02/81  MOD  2/23/82  ) 

2 

3  0  INTEGER  TPERROR  0.0.  CUR  » 

4  0  INTEGER  EOFLG 

5 

6  053042  INTEGER  ?TP  <  TAPE  ERROR  MASK  BITS  ) 

7 

10  SUBROUTINE  TTAPE 

11  00  SUB.  EOFLG  0  STA.  22  DIA.  0  3  MOV.  >< 

12  33  MOV.  /2  SNC  IF.  EOFLG  0  STA.  THEN. 

13  ?TP  3  LDA.  0  3  AND.  SNR 

14  IF.  222  NIO.  TPERROR  0  STA.  CUR  3  LDA. 

15  TPERROR  1+  DUP  3  STA.  0  0  SUB.  1+0  STA. 

16  10  0  LDA.  0  0  NEG.  ABORT  I)  JSR. 

17  THEN.  RETURN 
20  IS 


BLOCK!  11380(26164) 

1  (  TAPE  READ  ROUTINES  FCW  12/9/80  MOD  3/1/82  ) 

3  '  TRDY  INTEGER  TP?  '  TTAPE  . 

4 

5  (  BUFFER  ADDRESS  ON  STACK.  RETURNS  WORD  COUNT  ON  STACK  ) 

6  CODE  TREAD  TP?  I)  JSR.  0  0  SUB.  22  DOA.  22  DOC.  0  S)  0  LDA. 

7  122  DOB.  TP?  I)  JSR.  TP?  1+  I)  JSR.  CUR  ISZ.  222  DIB. 

10  0  S)  1  LDA.  1  0  SUB.  PUT  JMP. 

11 

12  (  BUFFER  ADDRESS  ON  STACK.  RETURNS  EOF  FLAG  ON  STACK  WITH  > 

13  (  WORD  COUNT  UNDERNEATH.  ) 

14 

15  :  TRDEOF  TREAD  EOFLG  9  I 

16 
17 

20  IS 


BLOCK:  11381(26165) 

1  (  TAPE  WRITE  ROUTINE  FCW  12/09/80  MOD  2/23/82  ) 

2 

3  (  BUFFER  ADDRESS  ON  STACK.  WC  UNDER  STACK  ) 

.4  (  RETURNS  AFTER  WRITE  INITIATED  ) 

5  1  .CODE  TWRITE  50  » 

6  TP?  I)  JSR.  TP?  1+  I)  JSR. 

7  22  DIA.  4  1  LDA.  1  0  AND.  SNR 

10  IF.  2  0  LDA.  ABORT  I)  JSR.  THEN. 

11  CUR  ISZ.  '  TWRITE  0  LDA.  22  DOA.  0  S)  0  LDA. 

12  22  DOB.  1  S)  0  LDA.  122  DOC.  2F0P  JMP. 

13 

14 

15 

16 
17 

20  IS 
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BLOCK!  11382(26166) 

1  <  FIND  DOUBLE  EOF  ROUTINE  FCW  2/23/82  MOD  02/23/8 

2 

3  t  1FILE  77777  FWDSPC  i 

A  1  r CODE  :?TAPE  '  TTAPE  »  '  • TTAPE  I)  JSRt  NEXT  JMP» 

5  1  r CODE  :TRDY  7  TRDY  »  '  JTRDY  I)  JSR»  NEXT  JMP, 

6 

7  <  POSITION  TAPE  BETWEEN  DOUBLE  EOF  MARKERS  ) 

10  :  END-OF-TAPE 

11  BEGIN  1FILE  1  FWDSPC  : TTAPE  EOFLG  0  END  BKUP  i 

12 

13 

14 

15 

16 
17 

20  ;s 


BLOCK:  11383(26167) 

1  (  EMPTY  BLOCK  ) 

2 

3 

4 

5 

6 
7 

10 

11 

12 

13 

14 

15 

16 
17 
20 


BLOCK?  11384(26170) 

1  (  BACKUP  ROUTINES  FCW  11/16/81  MOD  6-17-82  ) 

2  (  THESE  ROUTINES  DO  A  DISK  TO  TAPE  BACKUP  OF  A  ) 

3  (  BOOTABLE  DISK  IMAGE  ,  ) 

4 

5  ?  BFR  PREV  0  1000  -  i 

6  :  COPYBOOT  3  0  DO  BFR  I  DREAD  I  BFR  1000  +  ! 

7  -1001  BFR  T WRITE  LOOP  ) 

10 

11  :  D-T  FLUSH  REWIND  GAP  COPYBOOT  SIZE  3 

12  DO  BFR  I  DREAD  BFR  0  IF  I  BFR  1000  4  ! 

13  -1001  BFR  TWRITE  THEN  LOOP  EOF  i 

14 

15  171  LOAD  (  LOAD  TAPE-DISK  ROUTINES  ) 

16  fS 


*26200  26214  SHOW 


1  16 
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BLOCK?  11391(26177) 

1  <  DISK  HOUSEKEEPING  UTILITIES  FCW  03-10-81  MOD  6/17/82 

2 

3  :  DISK-UTILITIES  I 

4 

5  (  NULL  OUT  UNUSED  BLOCKS  ) 

6  :  ZO  1+  DUP  777  +  SWAP  DO  20040  I  !  LOOP  I 

7  J  BLANK  BLOCK  DUP  0  IF  DROP  ELSE  ZO  UPDATE  THEN  I 

10  :  CLRDISK  464  3  DO  I  BLANK  LOOP  FLUSH  I 

11 

12  <  ERASE  A  BLOCK  -  BLOCK  #  ON  STACK  > 

13  J  ERASE-BLOCK  DUP  BLOCK  ZERO!  BLANK  FLUSH  I 

14 

15 

16 
17 

20  IS 


BLOCK!  11392(26200) 

1  (  NEW  CSM  PICTURE  NULLING  ROUTINES  FCW  5-12-81  MOD  5/24/82  ) 


2  (  LOAD  MAP  FOR  ALL  ROUTINES  ) 

3  (  231  VARIABLE  AND  CONSTANT  DEFINITIONS  ) 

4  (  232  CSM  INSTRUCTION  GENERATION  ) 

5  (  233  CSM  I/O  ROUTINES  ) 

6  (  234  SEQUENTIAL  BLOCK  OUTPUT  ROUTINES  ) 

7  (  235  PATCH  PARAMETERS  TO  INTERFACE  BOARD  ) 

10  (  241  OVERFLOW  CHECKING  > 

11  (  242  CHANNEL  SET  UP  FOR  SUBTEACTION  > 

12  (  243  RUNTIME  ROUTINE  ) 

13 

14  :  CCD-SUBTRACT  I  BASE  0  OCTAL 

,  15  60  CONSTANT  CSM  63  CONSTANT  2SUB 


16  :  SUBTRACT-LOAD  244  231  DO  I  LOAD  LOOP  I  SUBTRACT-LOAD 

17  BASE  !  '  SUBTRACTOR  LOADED*  CR 

20  I  S 


BLOCK:  11393(26201) 

1  (  VARIABLES  AND  CONSTANTS  FCW  6/9/81  MOD  5/24/82  ) 

2 

3  BASE  0  OCTAL  41000  CONSTANT  BUF 

4  DECIMAL  103  CONSTANT  LI NEC 

5 

6  -2  INTEGER  OFFSET 

7 

10  0  CONSTANT  STRTBLOK  11  CONSTANT  ENDBLOK 

11  51  CONSTANT  LPF  (  LINES/FRAME  ) 

!  12 

13 

'  14  OCTAL 

15  0  CONSTANT  TOCSM  100  CONSTANT  FRMCSM 

16 

17  BASE  ! 

20  IS 
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BLOCK!  11394(26202) 

1  <  CSM  ALU  CODES  AND  INSTRUCTION  GENERATION  ROUTINES  05/15/81  ) 

2  <  MOD  5/24/82  ) 

3 

4  <  ON  FUNCTIONS*  A  IS  CSM  SIDE*  B  IS  NOVA  SIDE  ) 

5  1  CONSTANT  F=A  46  CONSTANT  F*0  23  CONSTANT  F=A+B 

6  70  CONSTANT  F=1  31  CONSTANT  F=2A  64  CONSTANT  F=B 

7 

10  0  INTEGER  BLK 

11  TOCSM  INTEGER  DIR 

12 

13  (  ALU  FUNCTION  ON  THE  STACK.  RETURNS  COMPLETED  INSTRUCTION  ) 

14  <  ON  STACK  ) 

15  CODE  : CSMINSTR  0  S)  0  LDA*  DIR  1  LDA*  1  0  ADD*  PUT  JMP» 

16 
17 

20  IS 


BLOCK:  11395(26203) 

1  (  CSM  I/O  ROUTINES  FCW  5/12/81  MOD  5/24/82  ) 

2 

3  2000  INTEGER  LBLK  (  LENGTH  OF  BLOCK  > 

4 

5  (  DOA  -  ALU  *  DIR*  DOB  -  BLOCK  #*  DOC  -  ADDRESS  ) 

6 

7  SUBROUTINE  CSMIO  (  INSTR  ACO*  BUF  AC1*  RETS  NEXT  BUFF  IN  ACO  ) 

10  CSM  DOA*  4000  CSM  +  DOC*  BLK  0  LDA*  100  CSM  +  DOB* 

11  LBLK  0  LDA,  1  0  ADD*  RETURN 

12 

13  (  INSTR  ON  STK ,  BUFFER  UNDER  STACK*  RETS  NXT  BUF  ) 

14  CODE  J CSMIO  0  S)  0  LDA*  1  S)  1  LDA*  CSMIO  JSR*  BINARY  JMP* 

15 

16 
17 

20  I  S 


BLOCK:  11396(26204) 

1  (  SEQUENTIAL  BLOCK  OUTPUT  ROUTINES  FCW  5-22-81  MOD  5/24/82  ) 

3  (  BLK  #,  INSTRUCTION.  BUFFER  #  OF  BLOCKS  TO  TRANSFER  ) 

4  BLK  INTEGER  DATA  0  *  0  *  0  INTEGER  NBLKS 

5  SUBROUTINE  NXTBLK 

6  DATA  I)  ISZ*  DATA  2+0  LDA*  LBLK  1  LDA*  1  0  ADD, 

7  DATA  2+0  STA,  RETURN 
10 

11  (  INSERT  INSTRUCTION  AT  DATA+1  AND  BUFFER  AT  DATA+2  BEFORE  ) 

12  (  CALLING  ) 

13  CODE  CSMOUT 

14  HERE  DATA  1+  0  LDA*  DATA  2+1  LDA*  CSMIO  JSR* 

15  NXTBLK  JSR*  NBLKS  DSZ*  JMP*  NEXT  JMP* 

16 

17  IS 
20  IS 
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BLOCK:  11397(26205 

) 

1 

(  LINE  TRANSFER 

ROUTINES  FCW  5-24-82  MOD  5/ 

vV 

« 

J 

3 

0  INTEGER  FLD 

4 

0  INTEGER  LLCC 

10000  f  20002  f  30147  f 

5 

6 

1  t CODE  OPATCH 

'  LLCC  » 

7 

FLD  1  LDAf 

1  1  MOV  f  /2  SZC  1  1  MOV f  +C  /2 

10 

0  3)  0  LDA ? 

1  0  ADD  f  7  DOAf 

*_  .• 

11 

1  3)  0  LDAf 

1  0  ADD f  7  DOAf 

rV;;’ 

j 

12 

2  3)  0  LDAf 

1  0  ADDf  7  DOAf 

r 

13 

3  3)  0  LDAf 

1  0  ADDf  7  DOAf  NEXT  JMPf 

14 

15 

1  f CODE  TRNSFR 

-146  f 

16 

'  TRNSFR  0  LDAf  107  DOCf  HERE  7  SZBf  JMPf 

•  r. 

17 

7  DIBf  0  0  INC f  7  DOBf  NEXT  JMPf 

i-/-’ 

20 

;s 

i 

BLOCK:  11398(2620 6) 

i 


N 


OFATCH  3  LDAf 


1  <  FRAME  TRANSFER  ROUTINES  FCW  5-24-02 

2 

3  CODE  7D0B  0  S)  0  LDAf  7  DOBf  FOP  JMPf 

4 

5  J  RD-FLD 

6  LF'F  0  DO  I  LLCC  !  I  lOOOO  +  LLCC  1+  ! 

7  OFATCH  TRNSFR 

10  LOOP  i 

11 
12 

13  l  RD-FRAME  BUF  OFFSET  8  +  7D0B 

14  0  FLD  !  RD-FLD  1  FLD  *  RD-FLD  f 

15 

16 

17  f  S 
20  JS 


MOD  5/25/82  ) 


BLOCK:  11399(26207) 


1  <  SCALE  F'lXL  VALUES 

2 

3  100  INTEGER  AD-OFF  <  A-D  OFFSET  ) 

4 


FCW  5-24-82  MOD  5/24/82  ) 


5 

1  f CODE 

SC-LN  146  f 

6 

'  SC- 

■LN  1  LDAf  N  1  STAf  0 

S>  3  LDAf 

AD-OFF  1  LDA. 

7 

HERE 

0  3)  0  LDAf  1  0  SUBf 

SZC 

10 

IFf  0  0  SUBf  ELSEf 

0  0  MOV  f 

/2  THENf 

11 

0  3)  0  STAf  3  3  INCf 

N  DSZf 

JMPf  POP  JMP. 

12 

13 

:  SCALE 

LPF  2  *  0 

14 

DO  BUF  LI NEC  I  *  +  SC- 

-LN  LOOP  f 

15 

16 

17 

20 

i  S 
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BLOCK!  11400(26210) 


1  <  MISCELLANEOUS  ROUTINES  FCW  5-22-81  MOD  5/24/82  ) 

2 

3  1  ALLBLOCKS  JCSMINSTR  400  0  DO  I  BLK  •  BUF  OVER  tCSMIO 

4  DROP  LOOP  DROP  * 

5 

6  1  OCSM  F=0  ALLBLOCKS  I 

7 

10 

11 

12 


15 

16 
17 

20  *S 


BLOCK:  11401(26211) 

1  (  CSM  OVERFLOW  CHECKER  AND  CORRECTOR  FCW  5-15-81  MOD  5/24/82  ) 

2 

3  :  READIN  FRMCSM  DIR  !  BUF  F=A  1CSMINSTR  :CSMIO  DROP  * 

1  4  :  WRTOUT  TOCSM  DIR  !  BUF  F*B  :CSMINSTR  1CSMI0  DROP  i 

5 

6  0  INTEGER  OVFLO  7777  INTEGER  MAXX 

7 

10  2  * CODE  ’EXCEED  2000  *  BUF  ,  0  0  SUB*  OVFLO  0  STA* 

11  '  ’EXCEED  0  LDA*  N  0  STA*  MAXX  1  LDA*  '  ’EXCEED  1+  3  LDA* 

12  HERE  0  3)  0  LDA.  0  1  SUB*  •  SZC  IF*  0  3)  1  STA,  OVFLO  1  STA* 

13  THEN,  33  INC,  N  DSZ*  JMP,  OVFLO  0  LDA*  PUSH  JMP* 

14 

15  :  OVFCHK  ENDBLOK  STRTBLOK  DO  I  BLK  • 

!  16  READIN  ’EXCEED 

1 17  IF  WRTOUT  THEN  LOOP  ) 

1 20  »S 


11402(26212) 


1  <  SET  UP  ALTERNATE  CHANNELS  FCW  05/14/81  MOD  5/24/82  ) 

‘  2 

;  3  (  STOP  SUBTRACTOR  #1  AND  THE  INTEGRATOR 

!  4  1  .CODE  II STOP  F-A  *  '  II STOP  0  LDA*  CSM  1+  DOA,  CSM  2  ♦  DOA* 

5  40  LDA*  CSM  1+  DOC,  CSM  2  +  DOC*  NEXT  JMP* 

6 

7  (  SET  UP  SUBTRACTOR  #2  FOR  202  OPERATION 

10  2  CONSTANT  RUN-FOREVER 

11  CODE  S2A  0  S>  0  LDA*  2SUB  DOA*  POP  JMP* 

12  CODE  S2B  0  S)  0  LDA*  2SUB  DOB*  POP  JMP* 

13  CODE  S2C  0  S)  0  LDA*  2SUB  DOC*  POP  JMP* 

14  CODE  S2ST  2SUB  100  4  NIO*  NEXT  JMP* 

15 

16  :  ST2SUB  F*A  S2A  STRTBLOK  ENDBLOK  1+  400  *  +  S2B 

17  RUN-FOREVER  S2C  S2ST  ) 

20  USTOP  ST2SUB  IS 


) 


) 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9t  1982 
BLOCK:  11403(26213) 

1  <  MAIN  RUNTIME  ROUTINES  FCW  5-24-82  MOB  5/24/82  ) 

2 

3  (  CSM  ROUTINE  SET  UP  ) 

4  J  CRSU  TOCSM  DIR  !  F=A+B  JCSMINSTR  DATA  1+  !  BUF  DATA  2  +  ' 

5 

6  4  INTEGER  SLC 

7  :  SUBTRACT  OCSM 


10 

SLC  0  0  DO  CRSU  RD 

11 

ENDBLOK 

12 

CSMOUT  1 

13 

LOOP  1 

14 

15 

16 

17 

20  ?S 

block: 

11404(26214) 

1  <  EMPTY  BLOCK  ) 

2 

3 

4 

5 

6 
7 

10 

11 

12 

13 

14 

15 

16 
17 
20 


BLOCK:  11405(26215) 
1  (  EMPTY  BLOCK  ) 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9.  1982 


BLOCK:  11520(26400) 

1  <  1PPS  AND  PHOTOGATE  TIME  TAG  CHECKS  FCW  1/27/82  ) 

2  <  NEW  TAPE  FORMAT  MOD  FCW  5/19/82  ) 

3  BASE  0  OCTAL 

4  t  D-28  D-  DDUP  DPOS  NOT  IF  2000000000.  D+  THEN  i 

5  DECIMAL 

6  t  STRP#  16  D/MOD  DROP  *  i  TRQ  BUF  TRDEOF  SWAP  DROP  i 

7  BUF  26  +  CONSTANT  PTG-OFFSET 

10  1  PTG-STEP  PTG-OFFSET  3  +  DUP  0  SWAP  2  +  0  *  6  +  » 

11 

12  0.  DINTEGER  LSTPG 

13 

14  t  PDFR  4  0 

15  DO  PTG-OFFSET  I  PTG-STEP  *  +  D0  STRP*  DDUP  LSTPG 

16  D0  DSWAP  LSTPG  D!  D-28  D.  LOOP  i 

17  OCTAL  401  LOAD  402  LOAD  403  LOAD  BASE  ! 

20  *  TIME-CHECKS  LOADED  *  CR  IS 


BLOCK!  11521(26401) 

1  (  1PPS  TIME  TAG  DIFFERENCES  FCW  1/27/82  MOD  2/23/82  ) 

2  BASE  0  DECIMAL 

3 

4  0.  DINTEGER  LAST-1PPS  0.  DINTEGER  MCS 

5  :  DDFR  BUF  2  +  D0  LAST-1PPS  D§  DOVER  LAST-1PPS  D ! 

6  D-  D.  BUF  16  +  D0  STRP*  MCS  D0  DOVER  MCS  D!  D-28  D.  i 

7 

10  :  PHOTOGATE-CHECK 

11  BEGIN  CR  STTI  TRQ  IF  1  ELSE  PDFR  CHKBD  THEN  END  i 

12 

13  :  DMA-CHECK 

14  BEGIN  CR  STTI  TRQ  IF  1  ELSE  DDFR  CHKBD  THEN  END  i 

15 

16  :  DMA/PT G-CHECK 

17  BEGIN  CR  STTI  TRQ  IF  1  ELSE  DDFR  PDFR  CHKBD  THEN  END 

20  BASE  !  i S 


BLOCK:  11522(26402) 

1  (  1PPS  AND  PTG  TIME-TAG  CHECKS  FCW  2/8/82  MOD  2/25/82  ) 

2  BASE  0  DECIMAL 

3  :  DMA- TIME  BUF  2  +  D0  DDUP  HMS  D.  BUF  16  +  D0 

4  STRP*  D.  f 

5 

6  :  PTG-MICROSEC  4  0 

7  DO  PTG-OFFSET  I  PTG-STEP  *  +  D0  STRP*  D.  LOOP  ? 

10 

11  :  MICROSECONDS  BEGIN  CR  STTI  TRQ  IF  1 

12  ELSE  DMA-TIME  PTG-MICROSEC  CHKBD  THEN  END  i 

13  :  MS  10  F  !  MICROSECONDS  » 

14  :  PC  PHOTOGATE-CHECK  I 
j  15  :  DC  DMA-CHECK  1 

j  16  :  DPC  DMA/PTG-CHECK  1 
; 17  BASE  ! 


T4  SYSTEM  PROGRAM  AS  OF  JULY  9,  1982 


BLOCK!  11523(26403) 

1  <  1PPS  AND  PHOTOGATE  TIME  TAG  CHECKS  FCW  1/27/82  ) 

2  (  NEW  TAPE  FORMAT  MOD  FCW  3/9/82  > 

3  BASE  8  DECIMAL 

4  :  PRT-TIMES  DMA-TIME  PTG-MICROSEC  t 

5  1  PDFR-CHK  4  0 

6  DO  PTG-OFFSET  I  PTG-STEP  *  +  D@  STRP#  DDUP  LSTPG 

7  D0  DSWAP  LSTPG  D!  D-28  DROP  DUP 

10  24000  <  IF  CR  ■  R#»*  CUR  ?  CR  PRT-TIMES  THEN 

11  26000  >  IF  CR  *  R#»*  CUR  ?  CR  PRT-TIMES  THEN 

12  LOOP  i 

13  1  PCHK  BEGIN  TRG 

14  IF  CR  ■  EOF*  CR  1  ELSE  PDFR-CHK  CHKBD  THEN  END  J 

15  BASE  ! 

16  :  PGF  RUN  REWIND  12  F  <  PCHK  REWIND  t 

17  tS 
20  i  S 


BLOCK:  11524(26404) 

1  (  REAL  TIME  CLOCK  ROUTINES  06/08/81  ) 

2 

3  CODE  C5  305  DOA,  205  NIO,  NEXT  JMP, 

4  CODE  STTI  110  NIO,  NEXT  JMP, 

5  1  » CODE  TICK  0  ,  '  TICK  1  LDA,  5  DIA,  0  1  SUB,  SNR 

6  IF,  '  TICK  0  STA,  2  0  LDA,  ELSE,  0  0  SUB,  THEN,  PUSH  JMP, 
i  7  CODE  1PPSCLK  5  DIA,  PUSH  JMP, 

10 

11  CODE  CHKBD  10  SZB,  IF,  110  DIA,  *177  1  LDA,  1  0  AND,  ELSE, 

12  00  SUB,  THEN,  PUSH  JMP, 

13 

14  BASE  0  DECIMAL 

15  :  HMS  60  D/MOD  -ROT  60  D/MOD  -ROT  24  D/MOD  -ROT  DDROP 

16  48  F  1+  •  2  F  32  F  1+  !  1 

17  :  HMS,  D@  HMS  I 

20  BASE  !  iS 


BLOCK!  11525(26405) 

1  (  EMPTY  BLOCK  ) 

2 

3 

4 

5 

6 
7 

10 

11 

12 

13 

14 

15 

16 
17 
20 
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APPENDIX  IV 

OPERATIONAL  PROGRAM  LOCATED  IN  THE  MICROPROCESSOR 
IN  THE  CAMERA  CONTROL  UNIT 


Tektronix 


M6800  ASM  V3.3  CCD202  9/25/81 


Pa*e 


00003  OOCA  CHIP  EQU  202  I  CCD  202 


00003 

INCLUDE 

•CCDSTPXS* 

•  SETUP 

00009 

"  '  ‘“LIST  ~ 

CND 

FLTKT  UNASSEMBLED  SOURCE 

00011 

oooo  >  one 

OOOOH 

I STORAGE  STARTING  ADDRESS 

00013 

1  SYSTEM 

DATA  VARIBLES 

00015  00 
00016  00 
00017  00 
00018  00 

00  0002 

DEST 

BLOCK 

2 

•DEST  ADDR  FOR  MOVE 

02  0010 

12  0001 

13  0002 

DTBL 

LCTR 

SRC 

?LftCk 

BLOCK 

BLOCK 

1  i 

1 

2 

fCLOClT  VOLTAGE’  TTTFLE 
•LINE  COUNTER 
•SOURCE  ADDR  FOR  MOVE 

00019  0015  OOOl 

INTR  ‘ 

r 

■Ilf  III  ■ 

00020  0016  0002 

VECT 

BLOCK 

2 

•INTERRUPT  JMP  VECTOR 

00022 

.  ' 

SYSTEM 

ADDRESS  EQUATES 

00024 

0800 

CfRl 

EQU 

80  OH 

•LATCH  FOR  COUNTER  1 

00025 

0801 

CTR2 

EQU 

80 1M 

•LATCH  FOR  COUNTER  2 

00026 

0802 

CAHNH 

EOU 

802R 

•  CAMERA  NO.TTT 

00027 

0802 

CLOCK 

ECHJ 

802H 

•CLOCK  SELECT 

00028 

0803 

INCDC 

EQU 

803H 

•INC/DEC  SNITCH 

00029 

lOOO 

LEW' 

EDO 

1WWT 

^DI^PLAf  LE09 

00030 

0804 

RCLK 

EQU 

804H 

•CLOCK  MASK  REGISTER 

00031 

0806 

RSTAT 

EQU 

B06H 

•CLOCK  STATUS  REGISTER 

00032 

0807 

RlftT 

TOO 

~T57fr 

IRESTART  COUNTERS'  ' 

00033 

03FF 

STK 

EQU 

3FFH  ■ 

•TOP  OF  STACK 

00035 

I 

SYSTEM  MASK  EQUATES 

0003 7 

0008 

CAMBT 

EQU 

OSH 

•CAMERA  BIT 

00038 

0007 

CLKBT 

EQU 

07H 

•CLOCK  S  PHASE  BIT 

00039 

oOio 

CNT  ' 

EOlJ 

10H 

JFM  KbouncE 

00040 

0003 

HR 

EQU 

03H 

•MASK  FOR  CLOCK  ENABLE 

00041 

0008 

HRP 

EQU 

OBH 

•  • 

00042 

0007 

HRV 

EQU 

07H 

»  • 

00043 

OOOF 

HRVP 

EQU 

OFH 

»  • 

00044 

0030 

IDBIT 

EQU 

3  OH 

•INC/DEC  BIT 

00045 

0010 

IWCBT 

EOU 

lOM 

1  tlfc  UIT 

0004A 

0040 

STOP 

EQU 

4  OH 

•STOP  CTR8  BIT 

00047 

0040 

TBENT 

EQU 

4  OH 

•TABLE  ENTER  BIT 

00048 

OOFO 

TBMSK 

EQU 

0?  OH 

» TABLE  Nb.~BTT 

/ 
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Tektronix  N6800  ASH  V3.3  CCDSTP  9/25/81  Put  2 


CCD  DRIVER 

SETUP 

PROGRAH 

00649  ' 

OOFO 

WR 

EtRJ  8FWT  IVHITTABLE' POSITION  . 

00051 

t 

r 

1 

1 

1 

i 

l 

j 

! 

i>i 

£ 

X 

o 

00053 

* 

note:  ON  REVISION  1  BOARD  COUNTER  1  IS  10  BITS  AND  COUNTER  2  IS 

00054 

1 

6  BITS.  OW  REVISION  2  60ARD.  COUNTER  1  IS  9  BITS  AND 

00055 

$ 

COUNTER  2  IS  7  BITS. 

00057 

FFFF 

IF 

CHIP-202 

00059 

I 

cCU  Z02 

9 

REVISION  02  BOARD 

00061 

OOIC 

VCNT 

EOU 

14S2 

1*  CNTS  FOR  VERTICAL  ON  END  LINE 

00062 

0067 

HCNT 

EQU 

103 

rr  H0RTZ0RTAITPUL5ES' 

00063 

.  007E 

VRCNT 

EOU 

63*2 

(VERTICAL  RESET  COUNTS 

. 

00064 

0032 

NROUS 

EQU 

51-1 

)*  ROUS/FIELD 

c 

00066 

ELSE 

00067 

1 

00068 

1 

CCD  211 

9 

REVISION  *1  BOARD 

00069 

SPACE 

1 

00070 

VCNT 

EQU 

63*4 

c 

00071 

HCNT 

EQU 

201 

00072 

VRCNT 

EQU 

63*4 

.  ' 

00073 

NROWS 

EQU 

124-1 

.  ^  . 

00074 

SPACE 

2 

00075 

ENDIF 
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7-* 

.J4 

?  * 

ft 


Tektronix  H6800  ASH  V3.3  CCDSTP  9/23/81 

CCD  DRIVER  SETUP  PROGRAH 


06677 

60079 


FB06 


00081 

00082 

00083 

00084 

00085 

00080 

00087 

00088 

00089 

00090 

00091 

00092 

00093 

00094 

00095 

00096" 

00097 

00098 


P800 
F803 
F805 
F80S 
F80A 
F80D 
F80F 
F812 
F814 
FBI  7 
F81A 
F81C 
F81E 
F821 
F824 
F826 
F828 
F82B 


- OF  BOOH - - 1  STARTING  ADDRESS  FOR  PROGRAH 

"  — SETUP  I" TOTALIZE  ROUTINE  . 


8E03FP 

8640 

870806 

8667 

870800 

861C 

870801 

8603 

870804 

CEF969 

DF16 

867E 

870013 

CEFEOO 

DF13 

863E 

B70806 

870807 


1N1TL  "LM~ 
LDA 
8TA 
’LfflT" 
STA 
LDA 

- stjt 

LDA 
STA 
LDX  ™ 
STX 
LDA 

.  STA 

LDX 

STX 

LDA" 

STA 

STA 


OTIC"  — 
A  48 TOP 
A  RSTAT 
A  •HCHT" 
A  CTR1 
A  ♦VCNT 
'  “A”  "CTR2  "" 
A  9HR 
A  RCLK 


"TSETSTACK  POINTER 
♦STOP  CTRS  t  INTERRUPT 


♦srrwcrs 


♦SET  HASK  FOR  CLOCK  ENABLE 


•1NTR1 
•VECT 
A  #7EH 
-#r  INTR 
•TABLE 
8SRC 


♦  SETH INTERRUPT  VECTOR" 


♦SET  PROGRAH  HOD 


♦SET  SOURCE  ADDR 


a  Tfooimrov 

A  RSTAT 
A  RUN 


1  CUR  ON  CTR  2UF.TNTRCTR  2UF.LCH  CTR  1UF 
♦START  IT  UP 


Tektronix  M6800  ASM  V3.3  CCDSTP  9/25/8*  Pa«»  4 

CCD  DRIVER  SETUP  PROGRAM 

OOIOO  rNCUJBr  '  CCDCTLXS’  - r  HOUSEKEEPING — 


00104 

♦ 

MAIN 

PROGRAM 

00106 

F82E 

BDF839 

> 

MNTFP 

JSR 

NEWTBL 

00107 

F831 

BDF8S9 

> 

JSR 

CKVAR 

00108 

F834 

BDF902 

> 

JSR 

TOLED 

00109 

F837 

20F5 

■  ':-m 

MNTFP 

00111 

♦ 

SUBROUTINE  NEWTBL t 

CHECKS  FOR  A  NEW  TABLE  ENTRY 

00113 

F839 

B60802 

NEWTBL 

LDA 

A  CAMNM 

♦  CHK  FOR  VARYING 

00114 

F83C 

84F0 

AND 

A  4VAR 

00115 

F83E 

88F0 

EOR 

A  #VAR 

00116 

F840 

2716 

BEQ 

NEWEX 

♦EXIT  IF  VARYING 

00117 

F842 

B60803 

LDA 

A  803H 

TCHKTBL  ENTER  SWITCH - 

00118 

F845 

43 

COM 

A 

00119 

F846 

8440 

AND 

A  6TBENT 

♦  CHK 

00120 

F848 

270E 

BEQ 

nEwex' 

'  ♦ NOT- PUSHED "  * 

00121 

» 

SET  UP  NEW  TABLE 

00122 

F84A 

BDF90D 

> 

JSR 

VTBL 

♦PUT  ADDR  OF  VAR  TABLE  AT  DEST 

00123 

F84D 

BDF91F 

> 

JSR 

~  rr«L 

1  PUT  ADDRESS  OF  FIXED  TABLE  AT  ! 

00124 

F850 

C608 

LDA 

B  «8 

♦MOVE  8  BYTE8 

00125 

F852 

BDF93F 

> 

JSR 

COPY 

♦COPY  THE  8  BYTES 

00126 

F855 

BDF8AD 

> 

JSR 

UPDAT" 

♦TO  The  PACS 

00127 

F858 

39 

NEWEX 

RTS 

00129  »  SUBROUTINE  CKVAR 1  1. CHECKS  IF  TABLE  SWITCH  IS  SET  TO  VARYING 

00130  I  2. IF  SETr  IT  CHECKS  THE  INC/DEC  SWITCH 

00131  *  “  ♦  5. IF~PUSMEBTIT  TNC/DEC  THE  PROPER  CLOCK 

00132  I  AT  A  4HZ  RATE  WHILE  HELD 


00134  F859  B60802  CKVAR  LDA  A  CAMNM  » CHECK  IF  SWITCH  SET  TO  VAR 

00135  F85C  84F0  AND  A  AVAR 

00136  F85E  88F0  ‘EBR  A  WAR  ~ 

00137  F860  2624  BNE  CKVEX  »NOT  SET  TO  VARYING 

00138  F862  B60803  LDA  A  INCDC  ♦CHECK  IF  INC/DEC  SWITCH  PUSHED 

00139  F86543  ‘  E0R  A  . 

00140  F866  8430  AND  A  AIDBIT 

00141  F868  271C  BEO  CKVEX 

00142  F86A  BDF887  >  JSR  DVOLT  HNC/BEF  "PROPER “CCdCiT 

00143  F86D  CE0190  LDX  *400 


00144  F870  BDFBA3  > 
00145  F873  860803 
00146  F876  43 


JSR  DELAY 

vaa — ls* - *r  m 

COM  A 


PUSHED 


00147  F877  8430  AND  A  4IDB1T 

00148  F879  270B  IE3  CKVEIT- 


n 

I 
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Tektronix  M4800  ASM  V3.3  CCDCTL  4/03/81 

CCD  DRIVER  CONTROL  PROGRAM 

00149  F678  DDF887r  >  TJSR  DVOLT  * 

001S0  F07E  CE0028  LDX  #40 

00151  F881  BDF8A3  > _ JSR  _  DELAY 

00152  F884  20ED .  BRA  '  CKV2 

00153  F884  39  CKVEX  RTS 


- UNC/DEC"  PROPER  CLOCK  AGAIN 


DEOO  > 
B60803 
43  “ 
8410 
2704 
6C00 
2002 
4A00 
A400 
B71000 
BDF8AD  > 


00155 

00154 

00157' 


00159 

00140 

00141 

00142 

00143 

00144 

00145 

00144 

00*47 

00148 

00149 

00170 

00171 


00173 

00174 


00174  F8A3  C4FA 
00177  F8A5  01 
00178  F8A45A 
00179  F8A7  24FC 
00180  F8A9  09 
66181  F8AA  24F7 
00182  F8AC  39 


00184 

00185 

00184” 


00188  F8AD  9412 
00189  F8AF  24FC 
00190 

00191  F8B1  9402 
0019?  F8B3  670808 
00193  F8B4  9403 
00194  F8B8  B70809 


SUBROUTINE  DU0LT1  1. INC/DEC  THE  CLOCK  SPECIFIED  BY  THE 
CAMERA  NO.  S  PHASE  SNITCHES 
2. UPDATES  LEDS  TO  CURRENT  VALUE' 


BDF9S1  >  DVOLT  JSR - TTKSOTr 


LDX 

_ LDA _ 

COM 

AND 

BEQ 

- IRC  " 

BRA 

DV2 _  DEC 

DV3  ' LDA 
STA 
JSR 
RTS 


0DEST 
A  INCDC 
A 

A  9INCBT 
DV2 

Y - 

DV3 

X 

AX 
A  LEDS 
UPDAT 


- nSETTWDR  OF  CLfC  TO  BEST 

»ADDR  OF  CLK  IN  X 
»READ  INC/DC  SNITCH 


ITNCTI —  - 

»DEC  -1 
I UPDATE” LEDS 

♦UPDAT  DACS 


' SUBRO'UTlWC~DErAYS_DELAYS  FORnNSCC  BEFORE" RETURNING 
NHERE  N-NO.  IN  X  REG. 


DELAY  LDA  B  9250 

DEL2  NOP 

dec  nr 

BNE  DEL2 

DEX 

- : — BNE - BELTSY — 

RTS 


I SET  COUNTER  FOR  1  MSEC 


~ I MSECS  -T 


SUBROUTINE  UPDAT 1  TAKES  THE  CLOCK  VOLTAGE  VALUES  FROM  RAM 
AND  NRITES  THEM  TO  THE  DACS  AND  THE 
- — — - rnBCR  OPTTC  LTNK - - 


UPDAf  LBS 
BNE 

« 

- LDA' - 

•  STA 
LDA 


UPDAT 


rmr  ~crn' 


808H 

8DTBL+1 


Tektronix  M6800  ASM  V3.3  CCDCTL  6/03/81 

CCD  DRIVER  CONTROL  PROGRAM 


Pal* 


6 


00193“ 

00196 

00197 

00198 

00199 

00200 

00201 

00202 

00203 


00204  l 
00205  I 
00206  I 

00208 

00210'  I 
00211  I 
00212  I 
00213  I 


960* — y 
D7080A 

9605  _ >_ 

B7080B 

9606  > 

B7080C  _ 

9607  '  > 

B7080D 

9608  > 


B7080E 
9609  > 

B7080F 


960A 

B71808 

960B 

“871609“ 


TBS - TT'  »DTBLf2 - -  JVf - — 

8TA  A  80AM 

LDA  A  0DTBL+3  IV- 

STA  A  89bB  " 

LDA  A  0DTBL+4  IP+ 

STA  A  80CH 

lda  "  a  ~§mcrsr  ~  ip- 

STA  A  80DH 

LDA  A  BDTBL+6  IR+ 


A  80EH 
LDA  A  8DTBL+7  IR- 

STA  A  80FH _ 

CAMERA  2  DACS  AND  FIBER  OPTIC  LINK 


CBS' 
STA 
■  LDA 


CAfT  T 


A  1808H 
A  8DTBL+9 
“S  1809H - 


00214 

F8E3 

960C 

> 

LDA 

A 

BDTBL+10 

1V4 

00215 

F8E5 

B7180A 

STA 

A 

180  AH 

00216' 

F8E8 

960D 

> 

LDA 

A 

BDTlE+ll 

»V- 

00217 

F8EA 

B7180B 

STA 

A 

180BH 

00218 

F8ED 

960E 

> _ 

LDA 

A 

0DTBL+12 

(P+ 

00219 

F8EF 

B7180C 

STA 

A  180CH 

00220 

F8F2 

960F 

> 

LDA 

A 

0DTBL+13 

IV- 

00221 

F8F4 

B7180D 

STA 

A 

180DH 

00222 

F8F7 

9610 

> 

LDA 

A  BDTBL+14 

TRT 

00223 

F8F9 

B7180E 

STA 

A 

180EH 

00224 

F8FC 

9611 

> 

LDA 

A 

8DTBL+15 

»R- 

00225  F8FE  B7180F 
00226 

00227  F901  39 


00229 
00230  ' 

00231 

00232  F902  BDF951 
00233  F905  DEOO 
00234  F907  A600 
00235  F909  B7100J) 
00236  TOOC-^ 


I 

I 

I 

TOLED 


UPDAT  FRONT  PANEL  LEDS  TO  CORRESPOND  TO  THE 

SELECTED  CAMERS  ATfB  CLOCK . . . 


CKADR 

ODE  ST - 

A’X 

A  LEDS 


»GET  AD DR  OF  CLOCK 

TABBR  TO  X  REG  ~ - 

•GET  BINARY  VOLTAGE  VALUE 
(WRITE  TO  LEDS 


00236 

00239 


RESB5  THE  CAMERA  TTO.-*'  PLACES'  THE  ADDR 
OF  THE  CORRESPONDING  RAM  TABLE  AT  DEST 


00241  F90D  5F 
00242  F90E  B60802 
00243  F9 11  8'401T 


VTBL  CLR 
LDA 


B 

A  CAMNH 


IFOR  CAMERA  1 
I READ  SELECTED  CAMERA 
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00244  F913  5602“ 
00245  F91S  C608 
00246  F917  CB02 

> 

- SHE - 

LDA 

VTB2  ADD 

VTV2 - 

B  68 

B  6DTBL 

IFOR  CAMERA  2 

1 COMPUTE  ADDR  OF  PROPER  TABLE 

00247  F919  D70l 

> 

.  STA 

B~  9DE5T+1 

00248  F91B  4 F 

CLR 

A 

00249  F91C  9700 

> 

STA 

A  8DEST 

00250  F9lE“  39  RTS' 


00252 

00253 

1 

I 

i 

i 

r 

TTSCS"  READS- 
OF  THE 

THE~C6HERA~N0.  t  “PLACES  THE-  ADDR 
CORRESPONDING  RAH  TABLE  AT  SRC 

00255 

F91F  5F 

FTBL 

CLR 

'B 

IFOR  CAMERA  1 

00256 

F920  B60802 

LDA 

A 

CAMNM 

IREAD  SELECTED  CAMERA 

00257 

F923  8508 

BIT 

A~~ 

“•CAHBT 

00258 

F925  2602 

BNE 

FTB2 

00259 

F927  C680 

LDA 

B 

♦BOH 

IFOR  CAMERA  2 

00260 

F929  84F0  - 

'  FTB2 

-  wnr~ 

- A — 6TBMSK - ’TREAD  SELECTED  TABLE - - 

00261 

F92B  88F0 

tOR 

A 

•VAR 

IRET  IF  VAR  SELECTED 

00262 

F92D  2601 

BNE 

FTB3 

00263 

F92F  39 

RTS 

00264 

F930  88F0 

FTB3 

EOR 

A 

•  VAR 

IFIXED  SELECTED  TABLE 

00265 

F932  44 

LSR 

A 

1 COMPUTE  ADDR  OF  PROPER  TABLE 

00266  F933  IB 

AB# 

00267 

F934  C6FE 

> 

LDA 

B 

•HI (TABLE) 

00268 

F936  8B00 

> 

ADD 

A 

•L0< TABLE) 

00269 

F938  C9 CO  * 

amt- 

W 

40 - 

00270 

F93A  9714  > 

STA 

A 

•SRC+1 

00271 

F93C  D713 

> 

STA 

B 

•SRC 

00272  F93E  39  . . -RTS- - 


"00274 

00275 

• 

1 

1 

SUBROUTINE  COPY '  COPIES  THE  NO.  OF  BYTES  IN  ACC  F  FROM 
THE  ADDR  AT  SRC  TO  THE  ADDR  AT  DEST 

00277 

F93F  DE13 

> 

COPT 

LDX 

•SRC 

00278 

F941  A600 

LDA 

AX... 

00279 

F943  08 

-  INX — 

00280 

F944  DF13 

> 

STX 

•SRC 

00281 

F946  DEOO 

> 

LDX 

•DEST  • 

00282 

F948  A700 

'  STA 

AX 

00283 

F94A  08 

I  NX 

00284 

F94B  DFOO 

> 

STX 

•DEST 

00285 

F94D  SA 

DEC 

B 

00286 

F94E  26EF 

BNE 

COPY 

00287 

F950  39 

RTS 

00289  I  SUBROUTINE  CKADR!  PLACES  THE  ADDR  OF  THE  CLK 

00290  - » - TO  INC  1H  BEST  "  ~ “ - 
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00292 

F95T1  "Sr 

i:kadr  cur  - 

fFOir  CAMERA  1 

00293 

F952  860802 

LDA 

A  CAHNH 

(READ  IN  CAMERA 

00294 

F935  8408 

AND 

A  9CAHBT 

00295 

F957  2602 

BNE 

CKAD1 

00296 

F959  C608 

LDA 

B  98 

IFOR  CAMERA  2 

00297 

F95B  860802 

CKAD1  LDA 

A  CLOCK 

00298 

F95E  8407 

AND 

A  9CLKBT 

00299 

F960  18 

ABA 

00300 

F961  8B02 

> 

.  ADD 

A  9DTBL 

00301 

F963  9701 

> 

STA 

A  8DEST+1 

00302 

F965  4F 

CLR 

A 

00303 

F966  9700 

> 

STA 

A  BDEST 

00304 

F968  39 

'  RTS 

3 
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00310 

00312 


00314 

00315 


0031A 

00317 

00318 

00314“ 

00320 

00321 


00323 

00324 

00325“ 

0032A 

00327 

00325“ 

00329 


THESE  ROUTINES  FORM  A  LINKED  LIST  FOR  PROCESSING  THE  CLOCK  COUNTER 

VECTOR  TOR  THE  NEXT  INTERRUPT  IN 
'VECT*  (  A  PAGE  ZERO  LOCATION  >  WHICH  IS  THE  ADDRESS  FIELD  OF  A  *JHP* 
INSTRUCTION.  THU8  NO  PROGRAM  LOGIC  IS  NEEDED  TO  DETERMINE  THE  POSITION 


2:2:7i! 


THE  ROUTINES  DO  TWO  THINGS:  1)  LOAD  LATCHES  THAT  DETERMINE  WHICH 
CLOCKS  ARE  TO  BE  ENABLED  OR  CLEARED  t  2)  LOAD  LATCHES  THAT  SET  THE 
COUNTERS  .  ALL"  EVENTS  ARE  SYCHROWTTrB  TO  THEOVERFLOU  OF  EITHER  COUNTER 
DETERMINED  DY  A  STATUS  BIT  WHICH  SELECTS  THE  COUNTER  OF  CHOICE.  THERE 
18  NO  •OFF*  POSITION  (I.E.  ONE  OF  THE  COUNTERS  WILL  ALWAYS  CAUSE  AN 


THERE  ARE  4  CLOCKS  TO  TAKE  CARE  OF  -  OH.  OR.  OV.  I  OP  (HORIZONTAL. 
RESET.  VERTICAL.  AND  PHOTOOATE  RESPECT I VLY) •  OH  AND  OR  ARE  ENABLED  BY 
“CLEARING  THE  APPROPRIATE  FT~OR  SETTING  ir  TU  ff.’  W  AND  OP  ARE  ENABLED 
BY  SETTING  THE  APPROPRITE  FF  TO  1.  WHATEVER  IS  TO  BE  DONE.  THE  LATCHES 
MUST  BE  LOADED  >BEFORE<  THE  DESIRED  COUNTER  UNDERFLOWS)  OTHERWISE  THE 

COUNTER  UNDER¬ 
FLOWS. 


UNDERFLOW  CTR2»  LAST  DATA  LINE.  FIELD  2 


00333 

00334 

00335 

00334 

00337 

00338 

00339 

00340 

00341 


l40r 

B70804 

841E 

870804 

847E 

B 70801 

CEF97E 

DF14 

3D 


00345  F97E  8420 
00344  F980  B70804  1 
00347  F983  CEF989  > 
00348  F9#4'  DF14  > 
00349  F988  3D 


00351 

00 353  F989  8407 
00354  F98D  B70804~ 
0035S  F98E  84 JE 
00354  F990  B 70804 
00357  F993841C 


A  RCLK 
A  400011  HOB 


A  4VRCNT 
A  CTR2 


) LATCH  ON  1UF.CLR  ON  2UF.INTR  ON  1UF 


UNDERFLOW  CTR1.  LAST  DATA  LINE.  FIELD  2 


A  RSTAT 
4INTR3 


INTR3  LDA  A  4HRV 

- ST* - A.  RCLK - : - 

LDA  A  400111114D  ICLR  ON  CTR2  UF.INTR  CTR2  UF.LTH  CTR1  UF 

8TA  A  RSTAT 
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Pa*e 


10 


00358  F995  B7O0O1 
00359  F998  CEF9A2  > 
00360  F99B  DF16  > 


STA" 

LDX 

STX 


00361  F99D  8632 
00362  F99F  9712 
00363  F9A1  3D 


LDA 

STA 

RTI 


A  '  CTR2 - 

9INTR4 
BVECT 
A  •NROBS- 
A  8LCTR 


00365 


I 


UNDERFLOW  CTR2  DATA  LINE  N 


00367  F9A2  7A0012 
00368  F9A5  2605 

00369  F9A7  CEF9AD _ > 

00370  F9AA  DF16  > 
00371  F9AC  3B 


>  INTR4  DEC 
BNE 
LDX 
STX' 

IN4EX  RTI 


Ten? 

IN4EX 

•INTR5 

BUECT 


(MORE  TO  GO 


00373 


‘UND¥RFL0W~CTR2~L  rNE“5  fmELD  ”1 


00375 

00376 

00377 

00378 

00379 

00380 

00381 

00382 

00383 


F9AD 

F9AF 

F9B2 

F9B4 

F9B7 

F9B9 

F9BC 

F9BF 

F9C1 


860B 

870804 

861E 

B70806 

867E 

B70801 

CEF9C2 

DF16 

3B 


INTR5 


LDA 

STA 

LDA 

STA 


A 
"A 

A  #0001 1  HOB 
A  RSTAT 


•HRP 

RCLiT 


(LOAD  ON  CTR1  UFtCLR  ON  2UFrINTR  ON  1UF 


LDA 

STA 

LDX 

~sfx 

RTI 


A  •VRCNf 
A  CTR2 
4INTR6 

sueer 


00385 


00387  F9C2  8620 
00388  F9C4  B70806 
00389  F9C7  CEF9CD  > 
00390  F9CA  DF16  > 
00391  F9CC  3B 


I  UNDERFLOW  CTR1»  LAST^ATA  LINE.  FIELD  I  . . 

INTR6  LDA  A  400100000B  (UPDATE  FF  CTR1  UFt  CLR  ON  CTR1  UF 


LDA 

STA' 

LDX 

STX 

"RTI 


A  400100000B 
A  RS'TAf 
♦INTR7 
BUECT 


00393 


( 


INTERRUPT  CTR2»  PHOTOGATE  LINE 


00395  F9CD 
00396  F9CF 
00397  F9D2 
00398  F9D4 
00399  F9D7 
00400 T9D9 
00401  F9DC 
00402  F9DF 
00403  F9E1 
00404  F9E3 
00405  F9E5 


8607 

B70804 

863E 

B70806 

861C 

B70S01 

CEF9E6 

DF16 

8632 

9712 

3B 


INTR7  LDA 
STA 

- LDA' 

STA 

LDA 

- STT 


A  BHRV 
A  RCLK 

~a  loormiDT" 


‘TCLR  "CTR2"  UFr  ~INTR '  CTR2  UT»  LATCH  CTR1 


A  RSTAT 
A  BVCNT 
A  CTR2" 


LDX 

STX 

IDA” 


STA 

RTI 


•INTR8 
BUECT 
A"  •NROSfiT 


A  BLCTR 


00407 


UNDERFLOW  CTR2»  DATA  LINE  Nr  FIELD  2 


(T( 


c 

€ 
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00410  P9E9  2605 
00411  F9EB  CEF969 
00412  F9EE  DF16 
00413  F9F0  3D 


> 

> 


LDX  6INTR1 

8TX  8VECT 

INDEX  RTI - 


t 
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P«*e 


12 


j» 


00413  - r 


RASTER  Far  CCG  70?  CHIP  (  REVISION  2  HOARTT  » 


£•;.  i  00418  t  CTR2  CTR1. 


1 

!  41  . 

1  • 

00420 

00421 

I 

151 

63 ( HRVP ) 

C 1 4  <  HRV ) 

103 (HRVP) 

103(  >3 

• 

00422 

00423 

1 

131 

63(HRP> 

C 14 (HRV) 

lOSfHRP) 

103(  >3 

9 

i 

• 

00423 

t 

RASTER  FOR  CCD 

211  CHIP  (  REVISION  1  BOARD  > 

00427 

1 

CTR2 

CTR1 

:  • 

00429 

> 

63 (HRVP) 

201 (HRVP) 

V*/ 

00430 

1124 

C63(HRV> 

201 (  )  3 

• 

00431 

t 

63(HRP) 

20KHRP) 

00432 

1124 

C 63 (HRV) 

201 (  )  3 

1 

;  • 

s 

i 

00434 

IHrR 

-  DISABLE  CLOCK 

ti 

;  • 

00433 

»V»P 

-  ENABLE  CLOCK 
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05437 

00441 


00443 

0044S 

00446 

00446 

00447 

00447 

00448 

00448 

0044? 

00449 

00450 

00450 

O04S1' 

00451 

00452 

00452 


ORG  OfEOOH 


P«A«  13 

I  IRJLTAGE  TABLETS - - 

(STARTING  ADDRESS  FOR  CAMERA  TABLES 


CHIP  -  202 


58B825CC 

48C8CF39 

3C3C3C3C 

3C3C3C3C 

55553555 

55555555 

6E6E6E6E 

6E6E6E6E 

87878787 

87C88787 

AlAlAlAi 

A1A1A1A1 

BVB9B9B? 

_B9B9B?R? 


I 

TABLE 


H+ 

M- 

V+ 

V- 

P6 

P- 

R+ 

R- 

88* 

184* 

37. 

204* 

72. 

200* 

207. 

57 

60* 

60* 

60* 

60* 

60* 

60t 

60* 

60 

if 3 1  15t  U3>  85?  85V  ,  85V  85?  83 

no*  no*  no.  no.  no*  no*  m*  n o 

135*  135*  135 »  135>  135*  200*  135*  135 

"TOT  mrnirmi  i*i»  i«iri6r*T6x~ 

IBS*  185*  185*  185*  185*  185*  185*  185 


00456  FE80  5BB825C£~ 
00456  FE84  48C8CF39 


/ 


1  39 
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06438“ 

00459 

00460 

004 A 1 

00442 

00463 

00444' 

00465 

00464 

00467 

00468> 

00469 


ELBE  TCHIP  ~5~2TI  - - - 

BRACE  1 

»  »  H*  H-  V+  V-  P+  R-  R+  R- 

TAiLE  BYTE  2527  5"47''l  697  277~f39 .  307 - 67  0 - 

BYTE  255,  64,  169 .  Or  139,  0,  Ot  0 

SPACE  2 

OS® - T#KE  T"BOH - - - - 

BRACE  2 

_ BYTE  252,  64,  169,  27,  139,  30,  0,  0 

BYTE  2357  647“  169,  5r~T397  367 - 67 - 6 - 

SPACE  1 

_ END  IF _ _ _ 


00471 _ FFFB  >  PRO  0FFF8H  _ 1  START  I  MB  ADDRESS  FOR  INTERRUPT  VECTORS 


00473  FFF80015  >  WORD  INTR  1 INTERRUPT  REQUEST 

00474  FFFA  0015  >  '  WOKE  INTR  TB0FT8ARE  INTERRUPT  - 

00475  FFFC  0015  >  WORD  INTR  ) NON-MASKABLE  INTERRUPT 

00476  FFFE  F800  > _ WORD  INITL _ 1  RESTART _ 


00478 


END 


/ 
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c 

c 

c 

Scalar* 

CAHBT  —  0008 

CNf - 00  i  6 

HRP -  0008 

INC DC  —  0803 

t  * 

CANNN  —  0802 
-CT»I-=-OBOO — 

HRV -  0007 

LED8 - 1000 

.CHIP - OOCA 

CTR2 '  - —  08OT 

HR  VP - OOOF 

NROUS  —  0032 

— - 

CLKBT  —  0007 

'  HCNT~~ -  00671 

IDBIT  --  0030 
RCLK  —  0804 

HUH -  0807 

VAR - 00F0 

snr  — ~  03FT 

.VCNT - 001C 

SI  UP -  0040 

VRCNT  —  007E 

1 BENT  —  0040 

( 

X  (default)  Section  TfOOOOl 

• 

,  -  H 

c 

CKA81  —  F95B 

CKADR  —  F951 

CKV2 - F873 

CKVAR  —  F859 

COPT - F9SF 

DEL  2  = —  F8A5 

DEL  AT  —  FSA3 

BEST -  0000 

c 

DV2  — —  F896 

DV3 - F89A 

DVOLT  --  .F887 

FTB2 - F929 

FTBL - F91F 

1N4EX  —  F9AC 

ZN8EX  —  F9F0 

INITL  —  F800 

INTRT  —  F969 

'1NTR2  —  T97E" 

TNTRT  --F9SV — 

‘  TNTRT  --  F9A? 

c 

INTRO  —  F9C2 

INTR7  —  F9CD 

INTR8  ~  F9E6 

LCTR - 0012 

NEWEX  —  F858 

NEHTBL  -  F839 

SRC  0013 

TABLE  —  FEOO 

c 

UPDAT  — FBAB 

VEUT - 001  'S- 

- VTV2  -  F9T7 - 

VTBL" ---  F901F 

% 

478  Source  Lines  478 

Assembled  Lines 

46570 

Bute*  available 

1 

>»  No  assemble 

errors  detected 

«< 

